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COMPUTER WITH A MEMORY SYSTEM FOR 

REMAPPING A MEMORY HAVING TWO 

MEMORY OUTPUT BUSES FOR HIGH 

RESOLUTION DISPLAY WITH SCROLLING OF 5 

THE DISPLAYED CHARACTERS 

BACKGROUND OF THE INVENTION 

The invention relates to the field of digital computers, 
particularly microcomputers, having video display ca- 
pabilities. 

Prior Art 

In the last few years, there has been rapid growth in 
the use of digital computers in homes by hobbyists, for 15 
small business and for routine engineering and scientific 
application. For the most part, these needs have been 
met with self-contained, relatively inexpensive mi- 
crocomputers or microprocessors with essential periph- 
erals, including disc drives and with relatively easy to 20 
manage computer programs. The design for computers 
for these needs requires considerable ingenuity since 
each computer must meet a wide range of applications 
and because this market is particularly cost conscious. 

A home or small business computer must, for exam- 25 
pie, operate with a number of different program lan- 
guages, including those requiring relatively large mem- 
ories, such as Pascal. The computer should interface 
with a standard raster scanned display and provide a 
wide range of display capabilities, such as high density 30 
alpha-numeric character displays needed for word pro- 
cessing in addition to high resolution graphics displays. 

To meet these specialize computer needs, generally 
requires that a relatively inexpensive microprocessor be 
used and that the capability of the processor be en- 35 
hanced through circuit techniques. This reduces the 
overall cost of the computer by reducing, for example, 
power needs, bus structures, etc. Another important 
consideration is that the new computers be capable of 
using programs developed for earlier models. 40 

As will be seen, the presently described microcom- 
puter is ideally suited for home and small business appli- 
cations. It provides a wide range of capabilities includ- 
ing advanced display capabilities not found in compara- 
ble prior art computers. 45 

The closest prior art computer known to applicant is 
commercially available under the trademark, Apple-II. 
Portions of that computer are described in U.S. Pat. No. 
4,136,359. 

SUMMARY OF THE INVENTION 5 ° 

A digital computer which includes a central process- 
ing unit (CPU) and a random-access memory (RAM) 
with interconnecting address bus and data bus is de- 
scribed. One aspect of the present invention involves 55 
the increased capability of the CPU by allowing base 
page or zero page data to be stored throughout the 
memory. Alternate stack locations and an improved 
direct memory access capability are also provided by 
the same circuitry. Detection means are used for detect- 60 
ing a predetermined address range such as the zero 
page. This detection means causes a special register 
(Z-register) to be coupled into the address bus. The 
contents of this Z-register provide, for example, a 
pointer during direct memory access, or alternate stack 65 
locations for storing data normally stored on page one. 

The memory of the invented computer is organized 
in an unusual manner to provide compatibility with the 



8-bit data bus and yet provide high data rates (16- 
bits/MHz) needed for high resolution displays. A first 
plurality of memory devices are connected to a first 
memory output bus; these memory devices are also 
connected to the data bus. The memory includes a sec- 
ond plurality of memory devices which are also con- 
nected to the data bus; however, the outputs of these 
second devices are coupled to a second output memory 
bus. First switching means permit the first and second 
memory buses to be connected to the display for high 
data rate transfers. Second switching means permit 
either one of the memory buses to be connected to the 
data bus during non-display modes. 

The addressing capability of the memory is greatly 
enhanced not only through bank switching, but through 
a novel remapping which does not require the CPU 
control associated with bank switching. In effect, the 
"unused" bits from one of the first and second memory 
buses are used for remapping purposes. This mode of 
operation is particularly useful for providing toggling 
between two separate portions of the memory. 

The display subsystem of the described computer 
generates video color signal in a unique manner. A 4-bit 
color code as used in the prior art, is also used with the 
described display subsystem. However, this code is used 
to generate an AC chrominance signal and a separate 
DC luminance signal. This provides enhanced color 
capability over similar prior art color displays. 

BRIEF DESCRIPTION OF THE DRAWINGS 

FIG. 1 is a block diagram showing the major compo- 
nents and subsystems of the invented and described 
microcomputer system. 

FIGS. 2 and 3 together show the central processing 
unit (CPU) and the architecture associated with this 
CPU, particularly the address bus and data bus. 

FIG. 2 is a circuit diagram primarily showing the 
address bus and the logic means associated with this 
bus. 

FIG. 3 is a circuit diagram primarily showing the 
data bus and its interconnection with the memory buses 
(A bus and B bus), bootstrap read-only memory, and 
input/output ports. 

FIGS. 4, 5 and 6 show the memory subsystem. 

FIG. 4 is a circuit diagram primarily showing the 
circuitry for selecting between address signals from the 
address bus and display counter signals. 

FIG. 5 is a circuit diagram primarily showing the 
generation of various "select" signals for the memory 
devices. 

HG. 6 is a circuit diagram showing the organization 
of the random-across memory and its interconnection 
with the data bus and memory output buses. 

FIGS. 7 and 8 illustrate the display subsystem of the 
invented computer. 

FIG. 7 is a circuit diagram showing the circuitry for 
generating the digital signals used for the video display. 

FIG. 8 is a circuit diagram of the circuitry used to 
convert the digital signals to analog video signals. 

FIG. 9 is a graph of several waveforms used to de- 
scribe a prior art circuit and the circuit of FIG. 8. 

DETAILED DESCRIPTION OF THE 

INVENTION 

A microcomputer system capable of driving a raster 
scanned video display is disclosed. In the following 
description, numerous specific details such as specific 
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part numbers, clock rates, etc, are set forth to provide a 
thorough understanding of the present invention. How- 
ever, it will be obvious to one skilled in the art that the 
inventive concepts described in this patent may be prac- 
ticed without these specific details. In other instances, 
well-known circuits have been shown in block diagram 
form in order not to obscure the present invention in 
unnecessary detail. 

Referring first to FIG. 1, in general the described 
computer includes a central processing unit (CPU) 65, 
its associated data bus 42, address bus 46, a memory 
subsystem and a display subsystem 58. 

The address bus 46 from the CPU is coupled to the 
memory subsystem to permit the selection of locations 
in memory. Some of the address signals pass through a 
multiplexer 47. For some modes of operation, signals 
from a register 52 are coupled through the multiplexer 
47 onto the bus 46. The register 52 is identified as the 
Z-register and is coupled to the multiplexer 47 by the Z 
bus. The general description of the multiplexer 47 and 20 
its control by the logic circuit 41 are described in detail 
in conjunction with FIG. 2. In general, the circuitry 
shown to the left of the dotted line 53 is included in 
FIG. 2 while the CPU 65, memory 50, data bus 42 and 
multiplexer 43 are shown in detail in FIG. 3. 

The address bus Nl is coupled to the read-only mem- 
ory 50. The output of this memory is coupled to the 
computer's data bus 42. The read-only memory (ROM) 
50, as will be described, stores test routines, and other 
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16-bit address bus is shown in FIG. 3 with its intercon- 
nections to the remainder of the computer. The pin 
number for each interconnection is shown adjacent to 
the corresponding line. In many cases, the nomencla- 
ture associated with the 6502A (CPU 65) is used in this 
application. For exam ple, pin 6 receives the nonmaska- 
ble interrupt signal (NMI), and pin 4 is coupled to re- 
ceive the interrupt request signal (IRQ). Some of the 
signals employed with the CPU 65, which are well- 
known in the art, and which are not necessary for the 
understanding of the present invention are not de- 
scribed in detail in this application, such as the various 
synchronization signals and clocking signals. The ad- 
dress signals from the CPU 65 are identified as A0-A7 
and A8-A15. The data signals associated with the CPU 
65 are shown as D0-D7. As will be apparent to one 
skilled in the art, the inventive concepts described in 
this application may be employed with other micro- 
processors. 

Referring now to FIGS. 2 and 3, the general architec- 
ture, particularly the architecture associated with the 
CPU 65 can best be seen. The address signals A0-A7 are 
coupled to a buffer 103 by the bus shown primarily in 
FIG. 2. These address signals are also coupled to the 
ROM 50. The signals A0-A7 after passing through the 
buffer 103 are coupled to the memory subsystem. The 
address signals As- A 15 (higher order address bits) are 
coupled through lines shown in FIG. 2 to the multiplex- 
ers 47a and 476. The contents of the Z-register 52 of 
data of a general bootstrap nature for system initializa- 30 FIG. 1 is also connected to the multiplexers 47a and 476 
tion. through the Z-bus (Z1-Z7). The multiplexers 47a and 

The data bus 42 couples data to the random-access 476 allow the selection of either the signals As-Ais 
memory (RAM) 60 and to and from I/O ports. This bus from the CPU 65 or the contents of the Z-register 
also couples data to the Z-register 52 and other com- (Z1-Z7) for addressing the RAM 60. The output of 
monly used registers not illustrated. The data bus 42 35 these multiplexers are shown as As-Ais; this designa- 
receives data from the RAM 60 through the A bus and tion is used even when the Z-bus is selected. Note in the 
B bus which are selected by multiplexer 43. The periph- case of the Zo signal, this signal is coupled to the multi- 
eral Bus N2 is used, as is better illustrated in FIG. 3, for plexer 47a through the exclusive OR gate 90 for reasons 
coupling to peripherals. which are explained later. The address signals As-An 

The memory subsystem is shown in detail in FIGS. 4, 40 are also coupled to the ROM 50, thus the signals 



25 



5 and 6. The address control means which receives 
addresses on bus 46, makes the final selection of mem- 
ory locations within the RAM 60. Bank switching, 
addressing for display purposes, scrolling and other 
memory mapping is controlled by the address control 45 
means 59 as will be described in greater detail in con- 
junction with FIGS. 4 and 5. The PAM 60 is shown in 
detail in FIG. 6. The counter 58 which is sychronized 
with the horizontal and vertical display signals, pro- 
vides signals both to the address control means 59 and 
to the display subsystem 48. 

The display subsystem receives data from the RAM 
60 on the A bus and B bus and converts these digital 
signals to video signals which control a standard raster 
scanned display. A standard NTSC color signal is gen- 
erated on line 197 and a black and white video signal on 
line 198. The same signals used to generate these video 
signals can be used to generate separate red, green, blue 
(RGB) video signals. The display subsystem 48 receives 



50 



55 



Ao-An are used for addressing the ROM 50. The sig- 
nals As-Ais are connected to the logic circuit shown in 
the lower left-hand corner of FIG. 2; this logic circuit 
corresponds to the logic circuit 41 of FIG. 1. 

The input and output data signals from the CPu 65 
are coupled by a bidirectional bus to the bidirectional 
buffer 99 (FIG. 3). This buffer is selectively disabled by 
gate 100 to allow the output of ROM 50 to be communi- 
cated to CPU 65 and during other times not pertinent to 
the present discussion. The direction of flow through 
the buffer 99 is controlled by a read/write signal cou- 
pled to the buffer through inverter 101. Data from the 
CPU 65 is coupled through the buffer 99 and bus 42 to 
the RAM 60 or to I/O ports. Data from the RAM 60 is 
communicated to CPU 65 or bus N2 from the A bus and 
B bus through the buffer 99. The 4 lines of the A bus and 
4 lines of the B bus are coupled to the multiplexer 43a. 
Similarly, the other 4 lines of the A and B buses are 
coupled to the multiplexer 436. Multiplexers 43a and 



numerous timing signals including the standard color 60 436 select the 8 lines of the A bus or B bus and commu- 



reference signal shown as 3.5 MHz (C3.5M). This sub- 
system is described in detail in FIGS. 7 and 8. 

COMPUTER ARCHITECTURE 

In the presently preferred embodiment, the CPU 65 65 
(microprocessor) employed with the described com- 
puter is a commercially available component, the 
6502A. This 8-bit processor (8-bit data bus) which has a 



nicate the data through to buffer 99 and bus 42. These 
multiplexers are selectively disabled (for example, dur- 
ing writing) by gate 102. As will be described later, the 
16 lines of the A bus and B bus permits the reading of 
16-bits from the RAM at one time. This provides a data 
rate of 16-bits/MHz which is necessary, for example, 
for an 80 character per line display. The data is loaded 
into the RAM 60, 8-bits at a time. 
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The ROM 50, as mentioned, stores test programs, Next assume th at page one has been selected by the 
data needed to initialize various registers, character CPU and that the ALT STK signal is low, indicating 
generation data (for RAM 162 of FIG. 7) and other the alternate stack locations ar e to be selec ted. (A flag is 
related data. Specific programs employed in the pres- set by the CPU to change the ALT STK signal). Since 
ently preferred embodiment of the computer are set 5 the ALT STK signal is low and As is high, a high out- 
forth in Table 1. The ROM 50 is selected by control put occurs from the gate 81. All the inputs to gates 83 
signals coupled to its pins 18 a nd 20, identified as signals and 84 are low, therefore, high outputs occur from both 
ROM SEL and T ROM SEL. Any one of a plurality of these gates. The conditions of gate 87 are met, causing 
commercially available read-only memories may be a high output from this gate and lowering the output 
used for the ROM 50. In the presently preferred em- 10 from the gate 89. The Z-bus is thus selected by the 
bodiment, commercially available Part No. SY2333 is multiplexers 47a and 476. This allows the contents of 
usec j the Z-register to be used as alternate locations. Non- 
Referring now to this logic circuit (lower left-hand zero P a S e locations are assured by inverting Ag. The 
corner of FIG. 2), the NAND gate 81 receives the exclusive OR gate 90 acts as a selective inverter. If Ag 
address sign al Ag and also the alternate stack signal ' 5 is high and Zo is low then Ag at the output of the multi- 
identified as ALT STK . The output of this gate pro- P le * er 47 ° , wlll A be . low - Note that dunn 8 ze \° P a « e 
vides one input to the AND gate 87. The Ag signal is selectlon «**> A « 1S low J *e % s, 8 nal » d,rec ? ^ 
also coupled through the inverter 82 to one input termi- mumcated through gate 90 to the output of multiplexer 
nal of the NAND gates 85 and 86. The address signals ^ ALT STK 
A, and A 10 are coup ed to the input terminals of the • » ^^ ^^ 
NOR gate 83 The output of this gate is coupled to one * further enhances ^ 
input terminal of the NAND gates 85 and 86 and he manc | of the cpu which would otherwise te i imited , 
AND gate 87. The address signals A.^h arc coupled Qne for stack locations 

to the input terminals of the NOR gate 84. The signaJ 2J The , Q jc circuit of FIG 2 ^ alsQ used along wjth the 

A,, is also coupled to an input terminal of the NAND z . register to provide a p^e,. during direct memory 

S ate »'■ access (DMA). Assume that direct access to the com- 

The outputs of the AND gates 87 and 88 (through r>s memory is required by a peripheral apparatus. 

NOR gate 89), controls the multiplexers 47a and 47fc To mitjate the DMA mode the cpTJ provides an ad . 

When the output of gate 89 is low the Z-bus is selected, 30 dress between F80 and R8FF. Th rough a log ic circuit 

otherwise the address signals from the CPU 65 are se- not illustrated in FIGS . 2 and 3, the ROM SEL signal is 

lected. brought low for addresses between F000 and FFFF. 

The logic circuit above-described, along with the j},^ signal is communica ted to ga te 93 and causes the 

Z-bus and Z-register provide enhanced performance for ou t pu t of gate 92 to rise (DMA 1 is high at this time), 

the computer. First, this circuit permits the zero page or 35 j^ is ^se in potential is communicated to one input of 

base page data to be stored throughout the RAM 60 tne gate 35 Additionally, gate 85 senses that the address 

rather than just on zero page. Secondly, this circuit bits Ag, A9 and A10 are low. This information is coupled 

enables addressing of alternate stack locations (other to gate 35 through the inverter 82 and the NOR gate 83 

than page one). Lastly, this circuit through the Z-regis- as high signals. Also the fact that An is high is directly 
ter provides a RAM pointer for direct memory access 40 communicated to gate 85. Thus, with the address be- 

(DMA). tween F800 and F8FF the DMA OK signal drops in 

Assume for purposes of discussion that the CPU 65 is potential. This is sensed by the p eripheral apparatus 
addressing the zero page of memory. That is, the higher which in turn causes the DMA 1 signal to drop and 
order address bits Ag-Ais are all zeros. The zeros for provides a ready signal to the CPU 65. With the com- 
A9-A15 are detected by the gates 83 and 84. If all the 45 pietion of this handshake, data may begin to be trans- 
inputs to these gates are zeros, the outputs of these gates ferred to the R AM. 

are high which condition is communicated to the gate The D MA 1 signal t hrough gate 93 and inverter 93 

87. Ag which is also low, insures that the output of gate forces the T ROM SEL signal low. This signal in addi- 

81 will be high. Thus, all the inputs to gate 87 are high, tion to being communicated to the ROM 50, is coupled 
causing the signal at the output of the gate 89 to drop. 50 to the buffer 99 through gate 100, disabling this buffer 

When this occurs, the Z-bus is selected. Instead of all (during the reading of ROM 50). Also, the ready signal 

the binary zeros from the CPU being coupled to the causes the CPU to come to a hard stop. Importantly, the 

main memory (RAM 60), the contents of the Z-register DMA 1 signal, after passing through the inverter 94 and 

form part of the address for the memory. Therefore, the gates 88 and 89, assures the selection of the Z-regis- 
even though the CPU 65 has selected the zero page, 55 ter. The contents of the Z-register are fixed and provide 

nonethelessdata may be written into or from any loca- a pointer to a page in the RAM. 

tion of RAM 60 (including the zero page). This en- Under the above conditions, the CPU increments the 

hances the performance of the CPU, since for example, lower 8-bits of the address signal. The ROM 50 fur- 

the time consumed in shifting data to and from a single nishes the instructions for incrementing the address, 
zero page is minimized. 60 specifically SBC #1 and BEQ. The peripheral appara- 

Normally, the CPU 65 selects page one for stack tus provides the data or receives the data in synchroni- 
locations. This occurs when Ag is high and A9-A15 are zation with the CPU operation. The peripheral also 
low. Assume first that the alternate stack locations have furnishes a read/write signal to indicate which opera- 
nd been selected. Both inputs to gate 81 are high and its tion is to occur. Data is then written into RAM via bus 
output is low. The low input to the gate 87 prevents the 65 N2 and bus 42, or read from RAM via the A and B buses 
selection of the Z-bus. Thus, for these conditions the and bus N2. 

address signals A0-A7 select stack locations on page Importantly, with the above DMA arrangement, 

one . addresses from the peripheral apparatus are not neces- 
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sary and the Z-register is used to provide a pointer to a lower right-hand corner of FIG. 6, the various signals 
page in RAM 60. applied to each device (including the address signals), 

along with the corresponding pin numbers are shown. 

MEMORY SUBSYSTEM Other circuitry not illustrated is the refresh control 

The memory sybsystem shown in FIG. 1 as the ad- 5 circuitry which ope rates i n a w ell-known manner in 

dress control means 59 and RAM 60 is illustrated in conjunction with the CAS, RAS and address signals to 

detail in FIGS. 4, 5 and 6 as mentioned. In FIGS. 4 and refresh the dynamic devices. 

5, the memory control means is shown, while in FIG. 6 Each row of memo ry d evices 106 receives a unique 

the memory devices and their organization are illus- combination of CAS and RAS signals. For example, 
trated. The address control means of FIGS. 4 and 5 10 row 111 rece ives C AS 5, 7 and RAS 4, 5; similarly, row 
receives the address signals from the CPU 65 (A0-A15), 112 r eceive s C AS and RAS 0, 3. The generation of 
the count in the vertical and horizontal counters these CAS and RAS signals is described in conjunction 
(counter 58 of FIG. 1) which are used during display with FIG. 5. These signals (along with the 14-bit ad- 
modes, control signals from the CPU and other signals. dress signals) permit the selection of a single 8-bit loca- 
In genreal, this control means develops the address 15 tion in the 96K byte memory (for writing) and also the 
signals which are coupled to the RAM of FIG. 6 includ- selection (for reading) of 1 6-bit locations, 
ing the column address and r ow ad dress signals, com- The memory of FIG. 6 may be expanded to a 128K 

monly referred to as CAS and RAS. Other related func- byte memory by using 32K memory devices, such as 
tions are also shown in FIGS. 4 and 5, such as the cir- Part No. 4132. In this case, four rows of eight, 32K 
cuitry which provides display scrolling, indirect RAM 20 mem ory device s are used with each row receiving two 
addressing and memory mapping. CAS and RAS signals. 

The CPU of FIG. 3 provides a 16-bit address for Before reviewing FIG. 4, a general understanding of 

addressing the memory. Under ordinary circumstances the organization of the display is helpful. The display, 
this address limits the memory capacity to 64K bytes. during certain modes, is organized into 80 horizontal 
This size memory is insufficient in many applications, as 25 segments and 24 vertical segments for a total of 1920 
for example, to effectively use the Pascal program Ian- blocks. 1 1-bits of the counter 58 of FIG. 1 are used as 
guage. As will be described in greater detail, the address part of the address signals for the memory to access data 
control means of FIGS. 4 and 5 enable the use of a for displaying during these modes. These counter sig- 
memory having a 96K byte or 128K byte capacity. One nals are shown in FIG. 4 as H0-H5 and V0-V4. During 
well-known technique which is used with the present 30 other display modes each horizontal segment is further 
invention for increasing this capacity is bank switching; divided into 8 segments (e.g. for displaying 80 alpha 
this switching occurs under the contol of the CPU. In numeric characters per line). This requires 3 additional 
addition, the address control means uses a unique indi- vertical timing signals shown as V^, V B and V c in 
rect addressing mode which provides the benefits of FIGS. 4 and 7. 

bank switching, however, this mode does not require 35 Often in the prior art, two separate counters are used 
CPU control. This greately enhances CPU operation to supply the timing/address signals for accessing a 
with the larger memory (as will be described) when memory when the data in the memory is displayed. The 
compared to the CPU controlled bank switching. count in one counter represents the horizontal lines of 

Referring first to FIG. 6, the RAM configuration is the screen (vertical count) and the other the position 
illustrated for a capacity of 96K bytes. The memory is 40 along each line, (horizontal or dot count). In many prior 
organized into six rows, each of which includes eight art displays the most significant bit of the dot counter is 
16K memory devices such as rows 111 and 112. In the used to increment the line counter. Data in memory 
presently preferred embodiment, Part No. 4116 MOS intended for display is mapped with a one-to-one corre- 
dynamic RAMs are used. (The pin designations and lation to the counts in these counters. In another prior 
signal designations refer to this memory device.) Obvi- 45 art system (implemented in the Apple-II computer sold 
ously, other memory devices may be employed. by Apple Computer, Inc.) this one-to-one correlation is 

Input data to these memory devices 106 is provided not used. Rather, to conserve on circuitry, a single 
from the bus 42. Each line in the bus 42 is connected to counter is employed and a more dispersed mapping is 
the data input terminal of one device 106 in each row. used in the memory. (Note that where a maximum hon- 
The interconnection of this bus with each of the mem- 50 zontal count of 80 is used, this number cannot be repre- 
ory devices is not shown in FIG. 6 in order to overcom- sented by all ones in a digital counter and thus the verti- 
plicate this drawing. By way of example, however, line cal counter cannot easily be incremented by the most 
107 connects the data bit D7 to the data input terminal significant bit in the horizontal counter.) Since this 
of one of the memory devices in each of the six rows. more dispersed mapping technique is part of the prior 
Three rows of devices 106 have their output termi- 55 art and not critical to an understanding of the present 
nals coupled to the A bus, and three rows are similarly invention, it shall not be described in detail. However, 
coupled to the B bus. By way of example, line 108 con- the manner in which it is implemented shall be discussed 
nects three output terminals of devices 106 to the DB7 in conjunction with the adder 114 of FIG. 4. For pur- 
line of the B bus while line 109 connects three output poses of discussion, the signals from the counter 58 of 
terminals of the devices 106 to the DA7 line of the A 60 FIG. 1 are designated as either vertical (V) or horizon- 
bus tal (H). 

The described memory devices 106 are each orga- Referring now to FIG. 4, the selection of either the 

nized as a 16KX1 memory. Thus, each device receives counter signals on the address signals from the CPU is 
a 14-bit address which is time multiplexed into two, made by the multiplexers 116, 117, 118 and 119. Each of 
7-bit addresses. This multiplexing occurs under the 65 these commercially available multiplexers (Part No. 
control of the CAS and RAS signals as is well-known. 153) couples one of four input lines to an output une. 
The lines coupling the address signals to each of the There are eight inputs to multiplexers 116, 117 and 118 
devices in FIG 6 are not illustrated. However, in the and the outputs of these multiplexers provide the ad- 
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dress signals for the memories (ARO through AR5). The 
multiplexer 119 has four inputs on its pins 3, 4, 5, 6 and 
provides a single output on pin 7, the AR6 address 
signal. (The signals supplied to pins 11, 12 and 13 of 
multip lexer 119 are for clamping purposes only.) 5 

The AX signal is applied to the pin 14 of each of the 
multiplexers. The signal on this line and the signal ap- 
plied to pin 2, determines which of the four inputs is 
coupled to each of the outputs of the multiplexers. The 
AX signal is a RAM timing signal for clocking the first 10 
7 bits and second 7 bits of the multiplexed 14-bit address 
applied to each of the memory devices 106. The other 
control signal to the multiplexers is developed through 
the AND gate 123. The inputs to this gate are the dis- 
play signal (DSPLY) which indicates that the computer 15 
is in a display mode a nd a cl ocking signal, specifically a 
1MHz timing signal (C1M). The output of the AND 
gate 123 determines whether the address signals from 
the CPU or the signals associated with the counter 58 of 
FIG. 1 are selected. 20 

Assume for purposes of discussion that the display 
has not been selected, and thus, the output of gate 123 is 
low. The AX signal then selects for pin 7 of multiplexer 
116 first the address signal Ao and then A6. Likewise, 
each of the multiplexers selects an address signal (ex- 25 
cept for those associated with exclusive OR gates 124 
and 125 which shall be discussed). If the display signal 
is high and an output is p rese nt from the gate 123, then, 
by way of example, the AX signal first causes the Hi 
signal and then the Vi signal to be connected to the 30 
AR1 address line. Similarly, signals corresponding to 
the vertical and horizontal count are coupled to the 
other address lines during display modes. 

The adder 114 is an ordinary digital adder for adding 
two 4-bit digital nibbles and for providing a digital sum 35 
signal. A commercially available adder (Part No. 283) is 
employed. The carry-in terminal (pin 7) is grounded 
and no carry-outs occur since one of the inputs (pin 12) 
is grounded. The adder sums the digital signal corre- 
sponding to H3, H4 and H5 with the digital signal corre- 40 
sponding to V3, V4, V3, V4. The resultant sum signal is 
coupled to the multiplexers 116, 117 and 118 as illus- 
trated, the summing of these horizontal and vertical 
counter signals is used to provide the more dispersed 
mapping as previously discussed. 45 

The adder 121 is identical to adder 114 and is coupled 
to sum the three least significant vertical counter bits 
from the counter 58 (FIG. 2) with the signals VA1, VB1 
and VC1. The sum is selected by the multiplexer 120 
during the high resolution display modes and also dur- 50 
ing scrolling as will be described. These sum signals are 
coupled to the multiplexers 117, 118 and 119. During 
the low resolution display modes, the mul tiple xer 120 
couples ground signals or the page 2 signa l (PG2) to the 
multiplexers 117, 118 and 119. (The PGl signal is used 55 
for special mapping purposes, not pertinent to the pres- 
ent invention.) During the high resolution modes when 
the display is not being scrolled, the VA1, VB2 and 
VB3 signals are at ground potential and thus no sum- 
ming occurs within adder 121 and the VA, VB and VC 60 
signals are coupled directly to the multiplexers 117, 118 
and 119. 

The address signals A10, An, and A13 from the CPU 
are coupled to the multiplexers 117, 118 and 119, re- 
spectively, through exclusive OR gates 124, 125, and 65 
126, respectively. The other input terminals to gates 124 
and 125 receive the C3 signal, while the other input 
terminal of the gate 126 receives the Ci signal. (The 



development of the Ci and C3 signals is illustrated in 
FIG. 5.) The gates 124, 125 and 126 provide mapping 
compensation within the memory. As the computer and 
memory are presently implemented, the sequence in 
which the various portions of the display are generated 
is not the same as the sequence in which the data is 
removed from memory for display. These gates provide 
compensating addresses and, in effect, cause a remap- 
ping so that the proper sequence is maintained when 
data is read from the memory for the display. These 
gates are shown to provide a complete disclosure of the 
presently preferred embodiment, however, they are not 
critical to the present invention. 

In operation, the circuitry of FIG. 4, as mentioned, 
selects the address signals which are applied to each of 
the memory devices, either from the CPU or counter if 
the display mode is selected. It should be noted that not 
all of the address bits from the CPU are coupled to the 
multiplexers 116 through 119. Some of these address 
bits, as will be described in c onjun ctio n with FIG. 5, are 
used to develop the various CAS and RAS signals and 
thus select different rows within the memory of FIG. 6. 

The scrolling operation which is used is somewhat 
unusual in that each line of the display is separately 
moved up (line-by-line) with one line of data in memory 
being moved for each frame. This technique provides a 
uniform, esthetically pleasing, scroll. Scrolling the 
screen one line per frame can be achieved by moving all 
the data in the memory into a new position for each 
frame. This would be very time consuming and imprac- 
tical. With the described technique, only one-eighth of 
the data in the memory is moved for each new frame. 

Referring to the adder 121, as mentioned, the signals 
V^, V/j Vc are the three least significant vertical 
counter bits from the counter 58. These bits or counts, 
by way of example, represent the 8 horizontal lines of 
each character. In adder 12, a 3-bit digital signal, VA1, 
VB1 and VC1, is added to the count from counter 58. 
This 3-bit signal is constant during each frame, how- 
ever, it is incremented for each new frame. 

During a first frame, 000 is added to the vertical 
count. During a second frame, 001 is added; and during 
a third frame, 010 is added, and so on. By adding this 
digital signal to the count from counter 58, the ad- 
dresses to the memory are changed in the vertical sense. 
During the first frame when 000 is added, the display 
remains unaffected. During the next frame, when 001 is 
added to the vertical count, instead of first displaying 
the first line of a character, the second line of each 
character is displayed at the top of each character space 
and each subsequent line of the character is likewise 
moved up one line. If data in memory is not moved, the 
first line of the character would appear at the bottom of 
each character. Note when 001 is added to 1 1 1 from the 
counter, 000 results. Thus, the first line of characters 
would be addressed when the beam is scanning the 
eighth line of characters. To prevent this, the data cor- 
responding to the first line of each character is moved in 
memory for this frame. The first line of one character is 
moved up and becomes the bottom line of the character 
directly above it. When 010 is added, the process is 
again repeated. For example, the third line of each char- 
acter is first displayed in each character space and the 
second line of each character is moved up to become 
the bottom line of the character directly above it. This 
process is repeated to scroll the data. The movement of 
data in memory is controlled by the CPU in a well- 
known manner. 
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Thus, through use of adder 121, an even, continuous 
scroll is obtained without moving all the data in mem- 
ory for each frame. Rather, only Jth of the data is 
moved for each frame. 

Referring now to FIG. 5, the circuitry used to extend 
the addre ssing from the CPU is illustrated. In general, 
the CAS signa ls are generated by the ROMs 127 and 
128. The RAS signals are generated by the ROM 132. 
The multiplexer 130 allows the selection of either the 
bank switching signals, or the unique indirect address- 
ing mode when "bank switching" occurs without direct 
commands from the CPU. 

The CAS ROM 127 receives as an address the fol- 
lowing signals: PRAS,<J>3, PRAS 1,2 AY, DHIRES, 
R/W, An, An, Ah, and An. As the PRASci, 3 and 
PRAS 1, 2 represent the RAS signals being used. These 
signals are high when the respective RAS signal is ac- 
tive. 

As previously mentioned, the AY signal is high for 
display modes and the DHIRES signal is high for high 20 
resolution display modes. The CAS ROM 128 receives 
as address signals the ABK1, ABK2, and ABK3 signals 
and also DHIRES, AY, IND, An, An, Ah, and An. 

The ROMS 127 and 128 are programmed to imple- 
ment the following equations. 



PCASO = (P RASO,3 (DHIRESAY + A Y (AlSAl- 
4.A13A11R/WN + A15A14A13R/WN + A1- 
5AliA13 + A15A14A13All))) 



(1) 



PCAS2 = (DH1RES-AY + AY(ABKIABK2-ABK- 
3 IND + AB K1 ABK2ABK3)(A 1SA14- 
) + AYINpABKlABK2.ABK3A15(A14A13- 
+ A14-A13)) 

PC AS3 = PRA SO. 
3(DH1RESAY + AY(A13A14-A13AU + A1- 
5A14AI3A11 + A15A14.A13))) 



(2) 



(3) 



PCAS4,6=(AYINDABK3A15(ABK1ABK- 

2 + ABKl)ABK2) 

( A14A 13 + A1 4-A13 ) + AYINDABK3(ABK- 

2 ABK1- A15 + ABKJABK1 + ABK Z ABE- 

1A15">A~14"+ AY INDABKlABIt2ABK3(Al- 

5ATJ-A13 + A15 

■AH-A1 3) + A YINDABK3ABK2(A15ABK- 
I + A13ABK1)(A14-A13 + A14A13)) 

PCAS5, 



(4) 



7, = (AYINDABK3(ABK1 ABK2 + ABK1- 
AB K.2)(A 15 A14-A13 + A 15A1 4-A13) + AYI- 
NDABg 3(ABK . 2AB KlA15 + AB"K2 ABK- 
1 + AB11 2ABK 1 A1 5)A14 + AYINDABK- 
lABKlABK3(AlS-AU)-t -AVIN DABK- 
3ABK2(A1SABK1 + A15ABK1)(AH-A13- 
+ A14-STJ)) 



(5) 



25 



30 



35 



4. These four signals (or alternatively four signals from 
the A bus) provide four of the inputs (address signals) to 
the ROM 132. The other inputs to this ROM are the 
DHIRES, Z PAGE, PA8, PA15, RFSH (refresh), and 
AY signals. These address signals select the RAS 0, 3; 
RAS 1, 2; RAS 4, 5 and RAS 6, 7 signals. The ROM 132 
is programmed to implement the following four equa- 
tions. 



10 



15 



50 



PRAS0.3 = A Y<DH1RES + RFSH) + (ABK4-(Z 
PagePA8))+ABKlABKJABK3)-AY 

PR AS1,2 = AY(D HIRES + RFSH) + A YIABK- 



1ABK2ABK3(ABK4-(ZPA GEPA8 )PA1S- 
) + ABK1ABK2 ABK3) + A Y aBX3(ABK- 
TABIUABK4.(ZPAGE FA8)PA15 + ABK- 
1 ABK2(ABK4-(ZPAGE PA8)FA"l5) 



PRAS4.5 = RFSHAY + AY ABK2ABK3(ABK- 
lABK4-(ZPAG E PA8 )PA1S + ABK1(ABK- 
4(ZPAGEPA8)PA15) 

PRAS6.7 = RFSH AY + AY ABK 3<ABK 1ABK- 
2ABK4-(ZPAGE PA8JPA15 + ABK1ABK- 
2-(ABK4-(ZPAGEPA8)PA15) 



(6) 



(7) 



(8) 



Thus, the bank switching signals (along with the other 
input signals to ROM 132) select predetermined rows in 
memory in conjunction with the CAS signals. 

The output signals of the ROM 132 are coupled 
through the NAND gates 142, 143, 144 and 145 to the 
memory. The other input terminals of these gates re- 
ceive the RAS timing signal. In this manner, the output 
signals of the ROM 132 are clo cked t hrough the gates 
142 through 145 to provide the RAS signals shown in 
FIGS. 5 and 6. 

An important feature to the presently described com- 
puter is provided by the circuitry shown within the 
dotted line 146. The AND gate 148 receives, at its input 
terminals, the DA7, An, and C3 signals. The NOR gate 
40 149 receives the zero page and An signal. The output of 
gate 149 provides one input to the gate 148 and also one 
input to the AND gate 150. The output of gate 148 
provides another input signal to gate 150 and this signal 
(line 153) is one of the two control signals coupled to 
45 the multiplexer 130. The AND gates 150 and 151 also 
receive a SYNC signal and the 4>o signal. The output of 
the gates 150 and 151 are coupled to a NOR gate 152 
with the output of the gate 152 (line 154) coupled to the 
other control terminal of the multiplexer 130. 

The gates 150, 151 and 152 effectively form a clock 
for multiplexer/register 130 (multiplexer 130 is a com- 
mercial part, Part No. 399, which effectively is a regis- 
ter/multiplexer). This selects the lower four input lines 
to the multiplexer 130. However, because of the syn- 



In effect, these ROMs are programmed to allow selec- 
tion of predetermined rows in the memory, based on the 
address signals A10, An, A 14 an d An, (ignoring for a 

moment the contribution of the RAS signals and the 55 ^htontMtion^gtial applied to gate 151, the multiplexer 
other signals appeanngm the equations) m ^^ the bank switching signals each time m Q p 

The outputs of the CAS ROMs ,127 and 128 are cou- ^ fctched ^ cpu 

pled to the register 131 Register 131 is a commercially understand the operation of the circuit shown 

available = register which permits ; the ermbhng of output £ shoM recaUed ^ ^ 

signals (Part No. 374). Du ring acc essing of the mem ory 00 
the various CAS signals (CAS through CAS 7) are 



coupled to the memory of FIG. 6 to permit selection of 
the a pprop riate memory devices. The signal USELB 
from CAS ROM 127 through register 131 selects either 
the A bus or B bus. This signal is coupled to the multi- 
plexers 43a and 43* of FIG. 3. 

During normal operation, the multiplexer 130 selects 
the bank switching signals BCKSW 1 through BCKSW 



65 



memory of FIG. 6 provides a 16-bit output. As men- 
tioned, during certain display modes, 16-bits/msec. are 
needed for display purposes. In nondisplay modes, only 
8-bits are required, particularly for interaction with the 
CPU. When the memory is addressed by the CPU dur- 
ing the indirect addressing modes the data on the A bus 
is not ordinarily used. However, with the circuitry 
shown within the dotted line 146, this otherwise "un- 
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used" data is put to use to provide the equivalent of the 
bank switching signals through multiplexer 130. 

Whenever the CPU selects a predetermined range of 
addresses, the multiplexer 130 selects the equivalent of 
the bank switching signals from the A bus provided 5 
DA7 is high. (This occurs when addressing as zero page 
the address space -1800 through 1FFF.) Once the signal 
on line 153 is high it is latched through gates 150, 151 
and 152 causing the multiplexer 130 to select the four 
bits from the A bus (assuming the timing signals are 10 
high). Even if the next reference from the CPU is not to 
this special address range, the multiplexer 130 nonethe- 
less remains latched with the four bits from the data bus. 
Once the SYN pulse drops, however, which is an indi- 
cation that an OP code is being fetched, the signal on 15 
line 154 rises in potential, causing the multiplexer to 
switch back to the bank switching signals. 

Effectively, what occurs is that when the CPU selects 
this special address range, (and provided DA7 is high) 
the bits DA0 through DA3 which are stored in mem- 20 
ory, cause a remapping, that is, the address from the 
CPU accesses a different part of the memory. With the 
fetching of each OP code, the mapping automatically 
returns to the bank switching signals. Importantly, the 
remapping, which occurs is controlled by the bits stored 25 
in the RAM (DA<j> through DA3). Thus, with the 
remapping information stored in RAM, toggling can 
occur between different portions of the memory with- 
out requiring bank switching signals, or the like from 
the CPU. This enhances the CPU's performance since 30 
CPU time is not used for remapping. Additionally, it 
provides an easy tool for programming. 

For some program languages it is desirable to sepa- 
rate data and the program into separate portions of the 
memory. For example, the 128K memory can be di- 35 
vided into two 64K memories, one for program and one 
for data. Switching can occur between these memory 
portions without the generation of bank switching sig- 
nals by the CPU with the above described circuit. This 
arrangement is particularly useful when using the Pas- 40 
cal program language. 

DISPLAY SUBSYSTEM 

The display subsystem 48 of FIG. 1 receives data 
from the A bus and B bus and converts the data into 45 
video signals which may be used for displaying alpha- 
numeric characters or other images on a standard raster 
scanned cathode ray tube display. The display subsys- 
tem 48 specifically generates on line 197, a standard 
NTSC color video signal and a video black and white 50 
video signal on line 198 (FIG. 8). This display subsys- 
tem, in addition to other inputs, receives a synchroniza- 
tion signal, and several clocking signals. For sake of 
simplicity, the standard color reference signal of 
3.579545 MHz is shown as C3.5M. Twice this fre- 55 
quency and four times this frequency are shown as C7M 
and C14M, respectively. 

Before describing the details of the display subsystem 
48, a discussion of a prior art display system will be 
helpful in understanding the present display subsystem. 60 
In U.S. Pat. No. 4,136,359, a video display system is 
described which is implemented in a commercially 
available computer, Apple-II, sold by Apple Computer, 
Inc., of Cupertino, Calif. In this system, 4-bit digital 
words are shifted in parallel into a shift register. These 65 
words are then circulated in the shift register at 14 MHz 
to define a waveform having components at 3.5 MHz. 
Referring to FIG. 9, line 206, assume that the digital 



word 0001 is placed in the shift register and circulated 
at a rate of 14 MHz. The resultant signal which has a 
component of 3.5 MHz is shown on line 206. The phase 
relationship of this component to the 3.5 MHz reference 
signal determines the color of the resultant video signal. 
This relationship is changed by changing the 4-bit word 
placed in the shift register. As explained in the above- 
referenced patent, if the signal 1000 is placed in the 
register and circulated, the resultant phase relationship 
of the 3.5 MHz component results in the color brown, 
this signal is shown on line 208. With this prior art 
technique, the luminance was determined by the DC 
component of the signals such as shown on lines 206 and 
208. 

The display subsystem 48 of FIG. 1 also uses 4-bit 
words to generate the various color signals in a manner 
somewhat similar to the above-described system. Refer- 
ring to FIG. 8, 4-bit words representative of colors (16 
possible colors) are coupled to the bus 180. (The genera- 
tion of these words shall be described in detail in con- 
junction with FIG. 7.) Instead of using a shift register 
which circulates the 4-bit work, the same result is 
achieved by using a multiplexer 205 which sequentially 
selects each of the lines of the bus 180. The signals on 
bus 180 also provide a luminance signal and a black and 
white video signal with a gray scale. 

The 4 lines of the bus 180 are coupled to multiplexer 
205; th is multiplexer also receives the C7M and the 
C3.5M timing signals. These two timing signals cause 
each of the four lines to be sequentially selected and 
coupled to line 191. (Note that the order in which each 
of the lines of the bus 180 is selected does not change.) 

In effect, the multiplexer operates to serialize the 
parallel signal from bus 180. Assume for sake of expla- 
nation that the digital signals on bus 180 are 1000 as 
indicated in FIG. 8. The signal on line 191 will then be 
10001000 The output of the multiplexer 205 cou- 
pled to the input of the inverter 204 also receives in a 
sequential order, the signals from bus 180, however, in 
a different order. For the example shown, the input to 
inverter 204 is 00100010 .... After inversion, this results 
in the signal 1 101 1 101 ... on line 192. Effectively, the 
signals on lines 191 and 192 are added by resistors 199 
and 200. The resultant waveform is an AC signal (no 
DC component) shown in FIG. 9 on line 209. Thus, 
with the described circuit, a chroma signal is generated, 
having a predetermined phase relationship to the 3.5 
MHz color reference signal. This phase relationship 
which is varied by changing the signals on bus 180 
determines the color of the video signal on line 197. 

In the prior art display discussed above, the DC com- 
ponent of the color signal determines the luminance. In 
the present invention, the signals on bus 180 are coupled 
to the base of transistor 195, consists of an AC signal 
from resistors 199 and 200, and the luminance level also 
determined by the signals on bus 180 . These inputs to 
transistor 195, along with the C3.5M signal, generate a 
NTSC color signal on line 197 of improved quality 
when compared to the discussed prior art system. 

In some cases, the signals on bus 180 are all binary 
ones or all binary zeros. When this occurs, there is no 
AC component from resistors 199 and 200 (no color 
signal) and the resultant signal on line 197 is either 
"black" or "white." 

The lines of bus 180 are also coupled through resis- 
tors to the base of a transistor 196. Each of these resis- 
tors have a different value to provide a "weighting" to 
the binary signal. 
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This weighting is used for non-color displays to pro- 
vide "gray" shades as opposed to having a display with 
only black and white. The binary signals on bus 180 
drive the transistor 196 to provide a video signal on line 
198. RGB is generated with weighted sums of these 
same five signals. 

Referring now to FIG. 7, data from memory is cou- 
pled from the A bus and B bus to registers 159 and 158, 
respectively. These registers are clocked by the 1 MHz 



mode, multiplexer 166 selects bus 181. Thus, typically, 
the multiplexer 171 receives the signals from bus 174. 
For purposes of description above, and also for pur- 
poses of explaining for some of the display modes below 
a simplifying assumption has been made. The signals 
coupled to the bus 180 by multiplexer 171, for most 
modes, are controlled by the serialized signal on line 
190. This serialized signal is in sychronization with the 
C7M or C14M clocking signals. The multiplexer 205 of 



clocking signal and its complement, thus permitting the 10 FIG. 8, which as described above, does the "spinning" 



sequential transfer of 8-bit words every 0.5 msec. As 
will be described, in some display modes the data is 
transferred at the 2 MHz rate, and in other display 
modes, at a 1 MHz rate. 

The registers 158 and 159 are coupled to an 8 line 15 
display bus 160. This display bus transfers data to regis- 
ters 164 and 173, and also addresses to a memory 162. 
The registers 164 and 173 and memory 162 are enabled 
during specific display modes as will be apparent. 



for the parallel digital signal on bus 180, operates in 
sychronization with the multiplexer 171. In the descrip- 
tion above, and except when otherwise noted below, it 
is assumed that, by way of example, if the multiplexer 
171 is coupling all binary ones and zeros onto bus 180, 
the signal on line 191 will be either ones or zeros. Also 
for this condition the signal on line 192 will be all binary 
zeros or ones, and thus, no AC signal is generated at the 
base of transistor 195. However, as actually imple- 



The character memory 162, in the presently preferred 20 mented, there is a "phase" difference between the 



embodiment, is a random-access memory which stores 
patterns representative of alpha-numeric characters. 
Each time the computer is powered up, the character 
information is transferred from the ROM 50 into the 
character memory 162 during an initialization period. 
During character display modes, the signals from the 
display bus 160 are addresses, identifying particular 
alpha-numeric characters stored within the character 
memory 160. The vertical counter signals V.4, Vb, and 
Vc (previously discussed in conjunction with adder 121 
of FIG. 4) identify the particular line in each character 
which is to be displayed. Thus, the generation of the 
digital signals representative of each of the characters 
occurs in an ordinary manner. The 7-bit signal represen- 
tative of each line of each character (memory output) is 35 
coupled to the shift register 167. Through timing signals 
not shown, either the register 164 or the character mem- 
ory 162 is selected to allow the shift register 167 to 



25 



30 



clocking of the multiplexer 171 when compared to the 
sampling of the signals from bus 180 by the multiplexer 
205. This results in a first constant AC signal on the gate 
of transistor 195 even when it appears that all binary 
ones are on bus 180, and a second constant AC signal 
when all binary zeros are on the bus 180. Thus, in this 
specification, when it states that "black" or "white" 
signals are being generated, instead, as currently imple- 
mented, two constant colors are generated on a color 
display. Where a true black and white is desired, color 
suppression is introduced such as through the color 
burst signal. 

The circuit of FIG. 7, along with the circuit of FIG. 
8, provides the capability for several distinct display 
modes. The first of these modes provides a display con- 
sisting of 40 characters (or spaces) per horizontal line. 
This requires a data rate of 8-bits/MHz or half the data 
rate the memory is capable of delivering. In this mode, 
data is loaded from the A bus during every other 0.5 



receive either data directly from the A bus or B bus, or 

alpha-numeric character information from the memory 40 /xsec period. (B bus is not used during this mode.) This 

162. data addresses the character memory 162, and along 

The 7-bits of information from either memory 162 or with the signals V^, Vb and Vc, provides the appropri- 

register 164 are serialized by the shift register 167 either ate character line (7-bits) to the shift register 167. Dur- 

at a 7 MHz rate or 14 MHz rate, depending upon the ing this mode, registers 164 and 173 are disabled. The 

display mode. The serialized data is coupled by line 185 45 shift register 167 for this m ode shifts the data at a data 



to the multiplexer 169, pins 1 and 4. The inverse of this 
data is also coupled to multiplexer 169, pin 3. Line 185 
is also coupled as one input to the multiplexer 166 and to 
the register 170 (input 1). 

The output 1 of register 170 (line 186) is coupled to 50 
the multiplexer 169, pin 1; to register 170 (input 2); and 
to multiplexer 166. Output 2 of register 170 (line 187) is 
coupled to input 3 of register 170 and also to multiplexer 
166. Output 3 of register 170 (line 187) provides a third 



rate of 7 MHz (note CH80 is high, allowing the 7 MHz 
signal from gate 175 to control the shift register 167). 
Each 7-bit signal is shifted serially onto line 185 and 
then to line 189 since multiplexer 169 selects pin 4. The 
data is shifted through the register 170 onto line 190 
The serial binary signal on line 190 causes the selection 
of buses 183 or 184. 

The four lines of bus 183 during this mode are cou- 
pled to +V (register 173 is disabled); therefore the 



input to the multiplexer 166. Input 4 of the register 170 55 selection of bus 184 provides four binary ones. The 



receives the output of the multiplexer 169 (line 189). 
Output 4 of register 120 (line 190) provides one control 
signal for the multiplexer 171. 

The multiplexer 171 selects either the four lines of bus 
183 or the four lines of bus 184. The output of multi- 
plexer 171, bus 180, provides the 4-bit signal discussed 
in conjunction with FIG. 8. During one of the high 
resolution display modes (AHIRES), the multiplexer 
171 is controlled by a timing signal from the output of 
the gate 178. 

The multiplexer 166 selects either the lines of bus 181 
or bus 182. The output of this multiplexer provides the 
signals for the bus 184. In all but the AHIRES display 



selection of bus 184 provides four binary zeros through 
bus 181. Thus, the serial binary signal on line 190 pro- 
vides either all binary ones or all binary zeros to bus 
180. As discussed, the circuit of FIG. 8 will provide a 

60 black and white display with 40 characters per line. 
If the inverse and flashing timing means 172 is se- 
lected, each time the shift register 167 is loaded, multi- 
plexer 169 shifts between pins 3 and 4. This causes the 
characters to change from white characters on a black 

65 background to black characters on a white background, 
and so on. 

During the 80 character per line display mode, the 
registers 158 and 159 are each loaded during sequential 
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0.5 fisec periods (this utilizes the 2 MHz cycle rate 
previously discussed). The shift register 167 shifts the 
character data from memory 162 at a 14 MHz rate. The 
serialized data at the 14 MHz rate is shifted through the 
register 170 and again controls the multiplexer 171 as 5 
previously described. (Note that register 170 is always 
clocked at the 14 MHz rate.) Flashing again can be 
obtained as previously discussed. 

In another alpha-numeric character display mode, the 
background of each character may be in one color and 10 
the character itself (foreground) in another color. This 
mode provides 40 characters per line. The character 
identification (address for RAM 162), is furnished on 
the A bus to register 159 at a frequency of 1 MHz. The 
color information (background color and foreground 15 
color) is furnished on the B bus as two 4-bit words to 
register 158. In the manner previously described, the 
address from register 159 selects the appropriate char- 
acter from memory 162 and provides this information to 
shift register 167. The color information from the B bus 20 
is transferred to register 173. For purposes of explana- 
tion, assume that the 4-bits identifying the color red for 
the background are on bus 184 (from register 173 and 
multiplexer 166) and that 4-bits representing the color 
blue for the foreground are on bus 183. (Note that when 25 
register 173 is enabled, the signals from the register 
override the binary ones and zeros which otherwise 
appear on the lines of bus 174.) The serial binary signal 
representative of the character itself on line 190, selects 
either the color blue from bus 183 for the character 30 
itself or the color red from bus 184 for the background. 
The digital signals representative of these colors are 
transferred to bus 180 and provide the color data to the 
circuit of FIG. 8. For black and white displays, a 
"gray" scale is provided through the weighting circuit 35 
associated with transistor 196 of FIG. 8. Again, the 
multiplexer 169 may, through the timing means 172, 
alternate between the signal of line 185 and its inverse, 
which will have the effect of interchanging the fore- 
ground and background colors. 40 

During the high resolution graphics modes, the char- 
acter memory 162 is not used, but rather, data from the 
memory directly provides pattern information for dis- 
play. This requires more mapping of data from within 
the main memory since new data is required for each 45 
line of the display. (Note that when characters are dis- 
played, the character memory 162 provides the differ- 
ent signals required for the 8 lines of each character 
row.) During these high resolution modes, the register 
164 is enabled and the character memory 162 is dis- 50 
abled. Thus, the data from the A bus and B bus is shifted 
into the shift register 167. In these modes, the "HRES" 
signal to multiplexer 169 causes this multiplexer to se- 
lect between pins 1 and 2. Pin 2 provides the signal 
directly from the shift register 167 while the signal on 55 
pin 1 is effectively the signal on line 185 delayed by one 
period of the C14M signal. This delay occurs through 
the register 170 from input 2 to output 2 since register 
170 is clocked at C14M. 

60 



During a first graphics mode, data from the display 
bus 160 is loaded into shift register 167 at the rate of 
7-bits/MHz. The data is serialized on line 185 and in the 
manner previously described for displaying characters, 
controls the selection of all binary ones and all binary 
zeros through the multiplexer 171. Note, as mentioned 
before, in the presently preferred embodiment, unless 
color suppression is used, this will not result in a black 
and white display, but rather a two-color display. If a 
high bit is present on line 140 of the display bus, the 
inverse and flashing timing means 172 causes the multi- 
plexer 169 to alternate between pins 1 and 2. This 
switching occurs at a 1 MHz rate and provides a phase 
shift for every other 7-bits of data coupled to the multi- 
plexer 171 on line 190. This results in an additional color 
being generated on the display for every other 7-bits of 
data. 

For the above-described graphics modes when shift 
register 161 is shifting at a 7 MHz rate, 8-bits may be 
coupled to the bus 160 during each period. Specifically, 
as in the case of the differing background and fore- 
ground colors for the 40 character per line display 
mode, two 4-bit color words are shifted into register 173 
at a rate of 1 MHz. Then, the multiplexer 171 selects 
between two predetermined colors on buses 183 and 
184. Note these colors can be changed at a 1 MHz rate. 

In an additional color mode identified as "AHIRES," 
multiplexer 171 operates under the control of gates 176, 
177 and 178. In effect, multiplexer 171 selects bus 184 
and latches the signals on this bus every four cycles of 
the C14M clock. Data is shifted into the shift register 
167 from the A bus and B bus every 0.5 fi sec the regis- 
ter 167 operates under the control of the C14M signal. 
Each data bit on line 185 is shifted first to line 186, then 
to line 187 and finally to line 188. These lines are cou- 
pled to the multiplexer 171 through multiplexer 166 
which selects bus 182 since AHIRES is high. In effect, 
what occurs is that 4-bit color words are serialized onto 
line 185 and then brought back into parallel on bus 182. 
Since multiplexer 171 latches the signals on bus 184 
every four cycles of the C14M signal, a new color word 
is generated at a 3.5 MHz rate on the bus 180. The 
resultant display is 140 by 192 colored blocks wherein 
each block can be any one of 16 colors. 

In the last display mode, typically used with color 
suppression, data is shifted into the shift register 167 
from the display bus at the rate of 14-bits/MHz. The 
data is serialized onto line 185 and controls the selection 
of either all binary ones or all zeros through multiplexer 
171. This provides the highest resolution graphics dis- 
play for the system. 

Thus, a microcomputer with video display capability 
has been described. The computer is fabricated from 
commercially available parts and provides high utiliza- 
tion of these parts. Numerous existing programs includ- 
ing many of those which operate on the Apple-II com- 
puter, may be employed in the above-described com- 
puter. 



65 



Page 0018 of 0170 



Apple Computer Inc. Patent : 4_383_296 



FOOO 
FOOO 

FOOO 

toco 

FOOO 
FOOO 
FOOO 
FOOO 
FOCO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOC 
FOOO 
FOOO 
FOOO 
0500 
0302 
FOOO 
0080: 
OOEO. 
FOOO 

ooei 

008.-? 

0083 

0084 

0085 

OOH •• . 

0088 

0089 

0009 

008A 

003B 

ooec 

00? ^ 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
FOOO 
0093 
0094 
009B 
009F 
FOOO 
FOOO 

FOOO: 
POOP: 

FOOO: 
FOOO: 
FOOO: 
0095: 
0095: 
0096: 
0097: 
FOOO: 
FOOO: 
FOOO: 
FOOO: 



13 
14 

15 
16 

18 
19 
20 

-1 



24 
25 
26 

e. 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

4o 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

64 
67 



4,383,296 
19 

TABLE I 

* CRITIC AL TlfllNO » 

* REQUIRES PAGE BOUND * 

* CONSIDERATIONS FOR » 

* CODE AND DATA ♦ 
. C0DE » 

* VIRTUALLY THE ENTIRE * 

* 'WRITE' ROUTINE » 

* MUSI NOT CROSS * 
PACE BOUNDARIES * 

* CP. •" . BRANCHES IN » 
» THE ' WRITE', 'READ', * 
« AND f«£AO ADR • SUBRS * 

* WHICH MUST NOT CROSS, » 
» PAGE BOUNDARY'S ARE * 

* NOTED IN C0P1ME.NTS * 

* * 
ft************************** 
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I 



EQUATES 



NBUFl 

NBUF2 

* 

HRDERRS 

DVHOT 



EQU 
EQU 

EQU 

EQU 



*2O0 
*302 

*80 
*E0 



» 
* 

(ZERO PA^tl AT $300 > 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 

t uu 

FQU 



l&SLOT 

IBTRVN 

IBTRK 

IBSECT 

IDBUFP 

IBCMD 

IBSTAT 

IBSMPD 
CSUM 

IDBPDN 

1MASK 

CUKTKK 

DRVOTRK 

; SLOT 4, 
, SLOT 
, SLOT 
, SLOT 
, SLOT 
, SLOT 

RETRYCNT EQU 
SEEKCNT EQU 
BUF EQU 
ENVTEMP EQU 
*IBSL0T+*1F 
* 

t««tt<MHH»«t t t HH>H tttf 



4, 
5, 
5, 

6, 
6, 



' RIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 
DRIVE 



*81 

IBSLOT-t-1 

IBSLOT+2 

IBSLOT+3 

IBSLOT+4 

IBSLOT+6 

IBSLOT-t-7 

IBSLOT+8 

IBSMOD 

IBSLOT+9 

IESLOT+*A 

IBSLOT+*B 

CURTRK-7 

1 

2 

1 



is 



&5 



i USED ALSO FOR ADDRESS HEADFR CKSUM 



IBSL0T+»12 
IBSLQT+*13 
IBSL0T+*1A 
IBSL0T+«1E 
NOT USED 



68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 



* READADR * 

* * 

************************ 

COUNT EQU IBSl6t+»14 j 'MUST FIND '' COUNT. 
LAST EQU IBSLOT+614 ; 'ODD BIT' NIBLS. 

CKSUM_ _EQU I B_SL0I+»I5_>_ CHECKSUM JBYTE, 

CSSTV EQU IBSLOT+6 16 > FOUR BYTES, 

* CHECKSUM, SECTOR, TRACK, AND VOLUME. 

*__ 

************************ 

* * 
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FOOO: 
FOOO; 


79 * WRITE 


# 




80 * 


* 






FOOO: 


81 * USES ALL NBUFS 


* 






FOOO: 


82 * AND 32-BYTE 


* 


. 




FOOO: 


S3 * DATA TABLE 'NIBL' 


* 






FOOO: 


84 # 


* 






FOOO: 
FOOO: 


85 »*»**#««**##***•******** 





86 * 






FOOO: 


87 *****##*******#**»****** 






FOOO: 


88 * .„. 


* 


_ _ . 




FOOO: 


89 * READ 


* 






FOOO: 


90 * 


* 






FOOO: 


91 * USES ALL NBUFS 


* 






FOOO: 


92 * USES LAST 54 BYTES 


* 






FOOO 


93 * OF A CODE PAGE FOR 


* 






FOOO 


94 * SIGNIFICANT BYTES_ 


* 


. . 




FOOO: 


95 * OF DNIBL TABLE. 


* 






FOOO: 


96 * 


* 






FOOO 


97 »»*»*#»******#*»»**♦**** 


- 




FOOO. 


98 * 








FOOO 


99 ***♦**#***************** 






FOOO 


100 * 


* 


. ... 




FOOO. 


101 * SEEK 


* 






FOOO- 


102 * 


* 






FOOO 


103 *«*♦*#******»*********** 






0095 


104 TRKCNT EQU COUNT 


i HALFTRKS MOVED COUNT 




009D. 


105 PRIOR EQU IBSL0T+*1C 






009E 


106 TRKN EQU IBSL0T+*1D 


- - 




FOOO: 


107 * 








FOOO: 


108 #**»**#*•*#****»********* 






FOOO: 


109 * 


* 






FOOO 


110 * MSWAIT 


* 






FOOO 


HI * 


« 






FOOO 


112 -a***********-************ 






0099 


113 MONT I MEL EQU CSSTV+2 


i MOTOR -ON TIME 




009A: 


114 MONTIMEH EQU MONT I MEL 


M ; COUNTERS. 






FOOO. 


115 * 








FOOO: 


117 •#•••••••••••••«►••*•»*•• 






FOOO: 

FOOO: 


118 • 


• 




119 * DEVICE ADDRESS 


* 






FOOO: 


120 * ASSIGNMENTS 


* 






FOOO: 


121 * _.._. 


* 


... 




FOOO: 


122 ****#****»*»*»**»»*♦**** 






C080: 


123 PHASEOFF EQU «C080 


i STEPPER PHASE OFF. 




C081: 


124 PHASEON EQU *C081 


; STEPPER PHASE ON. 




C08C: 


125 Q6L EQU *C08C 


; Q7L, Q6L=READ 






C08D: 


126 Q6H EQU «C08D 


i Q7L. Q6H=SENSE WPROT 




C08E: 


127 Q7L _EQU_ ♦C08E 


;Q7H, Q6L=WRITE 




C08F: 


12E Q7H EQU *C08F 


, Q7H. Q6H=WRITE STORE 




FFEF: 


129 INTERUPT EQU *FFEF 








FFDF: 
0080: 


130 ENVIRON EQU *FFDF 





— ._. 


131 ONEMEG EQU *80 




007F: 


132 TWOMEG EQU *7F 








FOOO: 


133 ******************************* 







FOOO: 


134 *~ 








FOOO: 


135 * EQUATES FOR RWTS AND BLOCK 






FOOO: 
FOOO: 


136 * 






137 ******************************** 






C088: 


138 MOTOROFF EQU *C088 






k 


Page 0020 of 0170 a 



< 








Apple Computer Inc. Patent : 4_383_296 










23 




4,383,296 

24 




C089 
C08A 


- 





139 MOTORON EQU *C089 

140 DRVOEN EQU »C08A 


- - ■ - -- 




C08B 






141 DRV1EN EQU *C08B 






C081 






142 PHASON EQU »C081 






C080 






143 PHSOFF EQU *C080 






009"' 






144 TEMP 


EQU CSSTV 


; PUT ADDRESS INFO HERE 




0097 






145 CSUM1 


EQU TEMP 






0098 






146 SECT 


EQU CSUM1+1 




009<? 






147 TRACK 


EQU SECT+ 


1 




0099 






148 TRKN1 


EQU TRACK 






O09A 






149 VOLUME EQU TRACK 


♦■1 




0083 






150 IDRERR EQU HFPEPRS-rj 




0082 






151 IDDERR EQU HRDEPRS+? 




0081 






152 IBWPER EQU HRDERRS+1 




0080 

F000 
FOOO 






153 IBNODRV EQU HRDERRS 








1H » 






* 




FOOO 






157 * ■[ 


AT Ah I TE A 


# 




FOOO 






158 * /tv.-vCK AND SECTOR 


* 




1 000 






159 . 






■«■ 




FOOO 






j£,r> »■ .,, < , „ ♦ < 


> ***■•* 


•»*****■******»« 




FOOO 






161 * 










FOOO 


AG 


01 


162 REGRWTS 


LDY 


#i 


, RETRY COUNT 




r 002 


A6 


91 


1 '. 2 


LUX 


1BS1.0T 


, GET SLOT # FOR THIS OPERATION 




ro04 


?4 


94 


ir4 


HT .' 


SFEKCNT 


ONLY ONE RECAL iro-ATf PER CALL 




F006 


Dtl 




165 


FHF 




-DETERMINE INTERS" '' STATUS 




F007 


b8 




166 


PLA 








F008. 


bA 




167 


ROR 


A 






F009 


bA 




168 


ROR 


A 


, GET INTERUPT FLAG INTO BIT 7 




i VGA 


bA 




: > V 


RGR 


A 






FOOIi 


bA 




1 -'-!■ 


ROP 


A 






FOOC 


3'. : 


SB 


1 '1 


■". T A 


l MASK 






FOOE 


*D 


DF FF 


172 


LDA 


ENVIRON 


, PRESERVE ENVIRONMENT 




F01 1 


35 


9F 


173 


STA 


ENV TEMP 






F013 






174 • 










FOl'J 






1 "•«• * NOW CHt:". 


if the n..:rop 


IS ON, THEN START IT 




f-'OU 






i "c * 










' o i ;; 


~-0 


2H Ft 


1 -"' 


JSP 


>. Hi-DRV 


CET 2FR0 FLAG IF MOTOR STORREI.' 




; o l & 


08 




178 


PHP 


, 


SAVE TEST RESULTS 




F- 1 7 


a 5 


85 


179 


LDA 


IBBUFP 


MOVE OUT POINTER TO BUFFER INTO 7r-AGE 




►■"019 


3-) 


9B 


180 


STA 


BUF 






F01I3 


>" 


8' 


iai 


t r>A 


13BUFP-H 






r o i rj 


•1^ 


90 


1 H2 


3 7 A 


RUF+1 






FV, IF 


Vy 


EO 


! Fi 3 


!."r\ 


*DVMOT 






FOr? 1 


-J 5 


S>A 


!B4 


STA 


MONTIMEH 






F023 


A5 


82 


185 


LDA 


IBDPVN 


DETERMINE DRIVE ONE OR TWO 




F025 


; d 


8A 


186 


CMP 


10BPDN 


SAME DRIVE USEi! BEFORE 




F02"? 


3? 


5 A 


1R- 


C,1 •'- 


IOGFDN 


S-.C IT FOP NE*T TIME- 




F029 


33 




i .->.-: 


PHP 




kt.EP RESULTS OF COMPARE 




F02A 


sA 




lh?9 


ROR 


A 


*.(•_: DRIVE NL'M"ER INTO CARRY 




F03B 


?!? 


89 c- 


190 


I. PA 


MOTORON, X 


, TURN ON THE DRIVE 




F02t. 


yo 


01 


191 


BCC 


DRIVSEL 


i BRANCH IF DRIVE 1 SELECTED 




FO'JO 


£Li 




192 


INX 




i SELECT DRIVE 2 




r ',' .: 1 


31- 


SA C '-■ 


l--vj L-R1VSEI. 


LDA 


DRVOEN, X 






rr o ", ;'♦ 


-M 


4C F' 


1 94 


JSR 


SET 1 MEG 


, INSURE ONE MEGAHERTZ OPERATION 




F-QT7 


-J 3 




195 


Pl.F 




, WAS I T DAME DR I Vfc" "• 




F038 


FO 


OA 


196 


BEQ 


OK 






F03A 


38 




197 


PLP 




i MUST INDICATE DRIVE OFF BY SETTING ZERO 




F03B 


AO 


07 


198 


LDY 


#7 


, DELAY 150 MS BEFORE STEPPING FLAG) 




F03P 


20 


56 FJ 


199 DRVWAIT 


JSP 


MSWA I T 


, (ON RETURN A-'-.i 




f'040 


LTiil 




200 


DEY 








( 041 


CO 


FA 


201 


BNE 


DRVWAIT 






F043 


08 




202 


PHP 




; NOW ZERO FLAG SET 




F044 


A5 


83 


203 OK 


LDA 


IBTRK 


GET DESTINATION TRACK 




F046 


A6 


81 


204 


LDX 


IB SLOT 


-RESTORE PROPER X <SL0T*16) 




(•04fi 


20 


05 F1 


.-.O c j 


JSR 


MYSEEK 


AND GO TO IT 




r<: -iu 






206 *NOW AT 


THE 


DESIRED TRACK WAS THE MOTOR 




F .-.-413 






.-■.7 . IN TO 


START WITH^ 1 






F04B 


28 




208 


PLP 




WAS MOTOR ON? 




F04C. 


DO 


17 


209 


BNE 


TRYTRK 


IF SO. DON'T DELAY, GET IT TODAY 1 




F04E. 






210 * 








k 
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26 




F-04E 


;!11 * MOTOR WAS OFF, WAIT FOR IT TO SPEED UP 




F04E 


c.' 12 * 








F04E AO 12 


213 MOTOF LDY 


»tl2 


iWAIT EXACTLY 100 US FOR EACH COUNT 




t-050 88 


214 CONWAIT DEY 




IN MONTIHE 




•"CM DO =~L' 


■{'.■ hnk 


:onwait 






'•O'i J fc-> -° 


i .-, ! Ni: 


MONT I MEL 


. COUNT UP TO 0000 




• 'T.v r r ' 


HNE 


MOTOF 






I- 0^7 Cv-: -a 


,:ifl INC 


MONTIMEH 






'■o , j9 p. c ".: 


,. i ■• am. 


MOTOF 






F05B 


221 **»«»«»»#»»»»*•*»♦**»*****•**** 




F05B 


222 « 








F03D 


22.3 * MOTOR SHOULD BE UP TO 


SPEED 




FCilJ 


:??A - IF - IT STILL 


LOOKS STOPPED THEN 




FO'JB 


2;^ -. Frit; DRIVE I 


S NOT PRESENT 




F05B 


226 ♦ 








F05B 

F05B. 20 2B Fl 


227 ♦»-,******■♦■»•»*****•»»»»»*******'•» 




228 JSR 


CHKDRV 


IS DRIVE PRESENT' 




FOSF! DC' 05 


.,;-- unf. 


TRY TRK 


YES, CONTINUE 




F 060 A 1 ? BO 


.-■ 5H !J!!!: , .~ '. VF.PR i.L>1 


«IBNODRV 


, NO, GET TELL EM MO W f-K 




F0o2 4C EB r -" 


.. ,1 JMF 


HNDLERR 






F065 
F063 


27'* * NOW CHECK 


IF IT IS NOT THE FORMAT DISK COMMAND 




2:34 « LOCATE THE CORRECT SECTOR FOR THIS OPERATION 




f 06'? A '3 67 


;; . r|» , 1 s. 1- .PA 


J13CMD 


Of. T COMMAND CODF » 




; ■■■ PEC* 


Al.LDPME 


IF NOLL COMMAND, GO F10MF-. 1 ■ ■ Kt'.D 




F0r>9 C9 03 
F06U BC 73 
F06D 6A 

rc-,! ; . 1'C 1 01; 


;--'R CMP 

r :;j9 no; 
,.:<v;. POP 
. •;: ■■«"•:•; 


#3 

ALLDONE 

A 

1FYTPK2 


, COMMAND IN RANGE"' 

NO. DO NOTHING' 

SET CARRY=1 FOR READ v F 0" WRITE 

MUSI PRENIBBL!?F ''!.,''- wHITf: 




F0 7 AD DF' f; 


- :;; LI A 
■1 - '-!-' 


F.NVIROU 
«1 *JOM£& 


, SHIFT TO HIGH SPC-ED 1 




F0 7 'J 3D DF FF 


244 STA 


ENVIRON 






FO/d. 20 06 F«. 
F07B AO 7F 


24 3 '5P 
;'.4n TRYTC|>, ' l I J ' 


PRENIBlo 
t*i7F- 


ONLY 127 RETRIES OF ANY KIND 




F07!) 84 9 3 


•"* ' 


i ■ ' !•■ , ■"MI 
! !- ',.. V 


GET SLOT NUM INTO X-REG 




F07F A6 SI 
F-031 20 BO r--. 
F084: 90 21 
F0B6 24 FjB 
. FOF3fc3 3C 01 




»,;.R 16 


, REAP NEXT ADDRESS FIFLD 




r'.r. B~ '. 


PDRICHT 


; IF READ IT RIGHT, HURRAH' 




2 t. rPr-ADR-' BIT 


[MASK 


.SHOULD INTERUPTS BE ALLOWED? 




,'s;? DM I 
r l ; 


N0INTR1 


; NO, DON'T ALLOW THEM. 

;RF-KNADLED AFTER READ/READAPR 'UR I T' 




■ ;-f. 'h 


RETRYCNI 


, ANOTHER MIST AEV.' ' FAILURE 




• J F: 13 l - " ^ -' 


' ■ ■ " •■!-'. 


TRYADR 


, WELL, LET IT 50 THIS TIME , 




F08F A? 8C 


; f ; LDA 
;■•",' PHA 


CURTRK 


, SAVE TRACK WE REALLY WANT 




FQ91 48 
F092 C6 94 
F"<?-! Uu J F 
F096 A- ■.•'.' 
FC9 2 r i* F ; 


..■■■.'■' DEC 


SEEKCNT 


,ONLi' RECALIBRATE ONCE 1 




HNE 


DRVERR 


.TRIED TO RECALIBRATE A SECOHO T I ME, _ 




LDA 


#«60 


.RECALIBRATE ALL OVER AGAIN' ERROR 




-■" ! JSR 


SETTRK 


.PRETEND TO BE ON TRACK 80 




F09B A9 00 
F09D 20 OS Fl 


26* tDA 
26' JSR 


tt»00 
MYSEEK 


i MOVE TO TRACK 00 




FOAO 68 

f-OAi ;•■: or, ' -. 

F0A4 4C 'B F- 


264 wtXALl PLA 
.'■'61 >-■.' -'•' ,'SR 
;..<.,.. .IMP 


MYSEEK 
TPYTRK2 


i GO TO CORRECT TRACK THIS TIME! 

, LOOP BACK, TRY AGAIN ON THIS TRACK 




f- :a 7 

F0A7 
F0A7 
F0A7 A4 99 


in" 1 ■ 

-AB » HAVE. NOW " 
269 * MAKE.' SURE 


EAD AN ADDRESS FIELD CORRECTLY „.„„ 




THIS IS THE TRACK, SECTOR, AND _ VOLUME DESIRED. 




270 R DP I OH! LDY 


TRACK 


; ON THE RIGHT TRACK-' 




F0A9 04 BC 
FOAB FO OE 


2't 1 -. pY 
-72 BF.'. 


-URTRK 

r. 'TRK 


, IF SO, GOOD 




FOAD 

FOAD: AS 8C 


2/3 * K '£'- A:. U'K.'- 


INi, FROM THIS TRACK 




274 LDA 


CURTRK 


i PRESERVE DESTINATION TRACK 




FOAF 4B 


275 PHA 








F080: 98 


276 TYA 








F0B1 20 25 Fl 


277 JSR 


SETTRK 






FOB 4 66 


278 PLA 








PM9: 20 Oft 


fl 279 JW 


HYHEK 






F0M:4C •« 
FOB! 


FO 280 jm 

262 • 


TRY^B«2 


j 00 AHEAD AMD WECALI1WATE 








F01B „ 


283 • DRIVE IS 


ON RIOHT TRAC.^' CHECK VOLUME MISMATCH 




FOBB 


284 • 








KOBB AS 9A 


283 RTTRK 1 DA 


VOLUME 


, GET ACTUAL VOLUME HERF 




FOBD 8S S9 


286 STA 


IBSMOD 


■ TELL OPSYS WHAT VOLUME WAS THERE 
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27 






28 




FOBF 


A5 


98 




287 


CORRECTVOL LDA SECT 


CHECK IF THIS IS THE RIGHT SECTOR 




FOCI 


C5 


84 




288 




CMP 


IBSECT 






F0C3 


FO 


02 




289 




BEQ 


CORRECTSECT i IF SO, DO WHATEVER WANTED 




hOC 5 


DO 


BF 




;;9o 




BNE 


TRYADR2 


NO, TRY ANOTHER SECTOR 




F0C7 


A^ 


87 




291 


COKHECTSECT 


LDA IBCMD 


, READ OR WRITE"' 




r- oc v 


4A 






292 




LSR 


A 


; THE CARRY WILL TELL 




FOCA 


90 


2D 




293 




BCC 


WRIT 


CARRY WAS SET FOR READ OPERATION, 




FOC C 


20 


48 


Fl 


294 




JSR 


READ16 


CLEARED FOR WRITE 




f-'OCF 


BO 


B5 




295 




DCS 


TRYADR2 


CARRY SET UPON RETURN IF BAD READ 




f- or i 


AD 


DF 


FF 


;96 




LDA 


ENVIRON 






F0D4 


29 


7F 




I- 1 9 7 




AND 


ttTWQMEG 






en 06 


'ji.. 


DF 


FF 


3«8 




STA 


ENVIRON 


, SET TWO MEGAHEFT? MODF. 




F0D9 


20 


U 


F3 


299 




JSR 


P0STNIB16 


DO PARTIAL POSTNIBBLE CONVERSION 




FODC 


BO 


AS 




300 




BCS 


TRYADR2 


CHEKSUM ERROR 




FODE 


Aft 


81 




301 




LDX 


IBSLOT 


RESTORE SLOTNUM INTO X 




fofo 


18 






302 


Ai. 


DONE CLC 








r'OF.I 


A 1 ? 


00 




J03 




LDA 


#*0 


. NO ERROR 




roE3 


90 


04 




,.-.14 




BCC 


ALD0NE1 


SKIP OVER NEXT BV1F WITH P;i OPCODE 




FOE 5 


6a 






305 


DRVERR PLA 




REMOVE CURTRK 




F0E6 


A9 


82 




306 




LDA 


#IBDERR 


i BAD DRIVE 




F0E8 


'JO 






307 


HNDLF.RR SEC 




INDICATE AN ERROR 




''OF - 


a? 


a e 




■.(0(3 


AL10NE1 ST A 


IBSTAT 


GIVE HIM ERROR* 




r-'OFB 


ED 


80 


C <' 


309 




LDA 


MOTOROFF, X 


i TURN IT OFF 




r oc-:t' 


24 


SB 




t;o 




BIT 


1 MASK 


; SHOULD INTERUFTS BE ENABLED' 




FOFO 


30 


01 




31 1 




BM1 


N0INTR2 


, BRANCH IF NOT 




FOF2. 


53 






312 




CLI 








F0F3 


A5 


9F 




313 


N0INTR2 L.PA 


ENVTEMP 


; RESTORE ORIGINAL ENVIRONMENT 




r.v? 


at' 


DF 


F- 


'3 14 




ST A 


ENVIRON 






f- . FH 


•-0 






'■■ 1"? 




rv-rs 








i- >■-■-; 


r ;.;> 


19 


F- 


" . c 


vih 


JSP 


UF-1TE16 


WRITE NYBBLES NOW 




FOFC 


90 


E2 




31 * 




BCC 


ALLDONE 


IF NO ERRORS 




FOFE 


A9 


81 




318 




LDA 


tHBWPER 


DISK IS WRITE PROTECTED' ' 




FlOO 


SO 


fc'6 




3 19 




BVC 


HNDLERR 


TAKEN IF TRULY WRITE PROTECT ERROR 




v \ '•::: 


4 ■■ 


66 


F."' 


3" ' 




JMP 


rpvADRS 


.OTHERWISE ASSUME AN [NTERUPT MESSED 




F 1 *i ,: ' 








'< -■ I 


c 






THINGS UP 




F105 








J22 


» 


"' r IS T*- 


E SEEK' ROUTINE 




F105 








323 


♦ 


SEEKS TRACK 'N' IN SLOT *X/»10 




F 103 








'324 


♦ 


IF DRIVNO 


IS NEGATIVE 


ON DRIVE 




F105 








325 


* 


IF DRIVNO 


IS POSITIVE 


ON DRIVE 1 




► 10'? 
MO 1 : 


PA 






^?6 


tr 

MY 


:eek asi. 


A 


ASSUME TWO PHASE STEPPER 




(- 1 06 


St' 


^"V 




33 1! 


3E 


- : f;ta 


ThKNl 


SAVt DESTINATION TRACK ( »2 ) 




F108 


20 


19 


Ft 


329 




JSR 


ALLOFF 


, TURN ALL PHASES OFF TO BE SURE 




F10B 


so 


3E 


Fl 


<30 




JSR 


DRVINDX 


i GET INDEX TO PREVIOUS TRACK FOR CURRENT 




F 1 OF. 


B5 


85 




331 




LDA 


DRVOTRK, X 


DRIVE 




n io 


85 


BC 








ST A 


CURTRK 


.THIS IS WHERE I AM 




f 1 1 :-: 


A? 


-><? 




■ 3 3 




LDA 


TRKN1 


. AND WHERE I 'M GOING TO 




Fl 14 


91? 


8 b 




3'14 




STA 


DRVOTRf x 






Fl 16 


20 


00 


F4 


3.35 


GO 


SEE* JSR 


SEE* 


, GO THERE ' 




Fl 19 


AO 


3 




336 


ALLC3FF LDY 


#3 


; TURN OFF ALL PHASES BEFORE RETURNING 




FUB 


9(3 






337 


NXOFF TYA 




i (SEND PHASE IN ACC ) 




Fl K 


2C" 


4A 


F4 


338 




JSR 


CLRPHASF. 


i CARRY IS CLEAR, PHASES SHOLD BE TURNED 

OFF 




Fl IF 


88 






339 




DEY 








F120 


: 10 F9 


340 


■TL 


NXOTF 






F122 
F124 


46 BC 

60 


341 

342 




LM 


CURTRK 


iDIVIPE BACK DOWN 




RT5 




i ALL OFF. . . NOW IT'S 


DARK 




F125 








344 


* 








F125 

F121 


■ 






345 

346 


♦THIS SUBROUTINE 


SETS THE SLOT DEPENDENT TRACK 


* LOCATION 






F\7-i 








347 


«• 








F-"12* 


2 


3E 


Fl 348 


SETTRK 


JSR DRV I 


NOX i GET INDEX TO DRIVE NUMBER. 




F128: 95 85 


349 




STA DRVO 


trk7x 




F12A: 60 




350 




RTS 






F12B: 






351 


****************** 


************* 




F12E 








352 


* 








F12I 


: 






353 


« SUBR TO TELL IF 


MOTOR IS STOPPED 




F12D 






354 


*• 








F12B- 






355 


* IF MOTOR IS STOPPED- CONTROLLER'S 




F 1 2B : 






356 


* SHIFT 


REG WILL 


NOT BE CHANGING. 




F12B 






357 


* 








F 1 2H 






358 


» RETURN Y=0 AND 


ZERO FLAG SET IF IT IS STOPPED 
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F12B 




359 * 








F12B: 




360 ♦ ***»******•**■**»•*•***#***»♦«#«* 




F12B: AO 


00 


361 CHKDRV LDY #0 i 


IN IT LOOP COUNTER 




F12D BD 


8C CO 


362 CHKDRV1 LDA Q6L. X i 


READ THE SHIFT REG 




F 1 30 20 


3D Fl 


363 


JSP CKDRTS i 


DELAY 




F13 - ' -'♦<? 




364 


PHA 






F13-> -,S 




365 


PLA 


MORE DELAY 




ri;?" Oil 


;-•■: 


366 


CMP G6L, X 


HAS SHIFT REG CHANGED" 




F13K DO 


3 


367 


BNE CKDRTS 


YES. MOTOR IS MOVING 




F13A S3 




368 


DEY 


NO, DEC RETRY COUNTER 




F 1 3tt DO 


ro 


369 


BNE CHKDRV 1 


AND TRY 256 TIMES 




F13i. >■? 




370 O 


DRfS RTS 


THEN RETURN 




fi3e: 




371 * 








fi:?( ■"''■:■• 




372 DR 


VINDX PHA 


, PRESERVE ACC 




F13F 8A 




373 


TXA 


i GET SL0T(**10)/S 




F140 4 A 




374 


LSR A 






F141 4A 




375 


LSR A 






F14:. 4 A 




376 


LSR A 






F14J-; 0'. 


s:"- 


377 


ORA IBDRVN 


i FOR DRIVE OR 1 




F14'.. A A 




378 


TAX 


; INTO X FOR INDEX TO TABLE 




F146 60 




379 


PLA 


i RESTORE ACC 




F147 faO 




380 


RTS 






F14S 




381 #*»*****************»**»****** 




F14h: 




382 * 








F 1 4L-. 




383 * 


NOTE: FORMATTING ROUTINES 




F14t- 




384 * 


NOT INCLUDED FOR SOS 




F14B 




385 * 








F148 




386 a**-*-************************** 




F14« 






W9 * 




« 


F148 






390 * 


READ SUBROUTINE 


* 




F148 






391 * 


(16-SECTOR FORMAT) 


* 




F148 
F148 







392 * 




* 




393 **«**«***«*******«**«***•« 




F148 






394 * 




» 




F148 
F148 






395 * 


READS ENCODED BYTES 


* 








396 * 


INTO NBUF1 AND NBUF2 


* 






F148 






397 * 




# 




F148 
F148 






398 * 


FIRST READS NBUF2 


* 








399 * 


HIGH TO LOW. 


* 






F148 






400 * 


THEN READS NBUF1 


* 




F148 






401 * 


LOW TO HIGH. 


* 


F148 






402 * 




* 




F148 






403 * 


ON ENTRY 


* 




F148 






404 * 




* 


F148 






405 * 


X-REQ: SLOTNUM 


* 




F148 






406 * 


TIMES •10. 


• 




F148 






407 * 




* 


F148 






408 * 


READ MODE (Q6L. Q7L > 


* 




F148 






409 * 




* 




F148 






410 * 


ON EXIT 


* 


F148 






411 * 




* 




F148 






412 » 


CARRY SET IF ERROR. 


* 




F148 






413 # 




* 
* 


F148 






414 * 


IF NO ERROR. 




F148 






415 * 


A-REG HOLDS *AA 


* «? — 




F148 
F148 






416 * 

417 * 


X-REG UNCHANGED. 


* 









Y-REG HOLDS »00. 


* 






F148 






418 * 


CARRY CLEAR. 


» 




F14B 

F148 






419 * 

420 * 


CAUTION 


* 
# 
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32 






F148 






421 * 




OBSERVE » 






F148 
F148 


■- 




422 * 

423 # 


'NO PACE CROSS' 
WARNINGS ON 


* 




# 






F148 






424 * 


SOME BRANCHES! ! » 






F148 






423 * 




» 






F148 






426 « 




- ASSUMES » 






F148 






427 « 




» 






F148 






428 « 


1 USEC CYCLE TIME * __ _ 






F148 






429 "# 




* 






F148 






430 #*»•##»##*♦♦»«•**##*»*#*♦*# 






F148 


AO 20 


431 READ16 


LDY #*20 ; 'MUST FIND' COUNT. 






'•■ 1 4A 


88 


432 RSYNC 


DEY " ; IF CAN 'T FIND" MARKS 




r- 1413 


FO 6B 


433 




BEQ RDERR , THEN EXIT WITH CARRY SET 




Fl 40 


BD 8C 


CO 434 RD1 




LDA Q6L, X 


READ NIBL. 






F150 


10 FB 


435 




BPL RD1 


*#* NO PACE CROSS 


»** 




F152 


49 D5 


436 RSYNC 1 


EOR #«D5 


DATA MARK 1? 






F154 


DO F4 


437 




BNE RSYNC 


LOOP IF NOT 






T156 


EA 


" 438 




NOP 


DELAY BETWEEN NIBLS. 




Fl?>7 


ED SC 


CO 439 RD2 




LDA Q6L, X 






F 1 5A 


10 FB 


440 




BPL RD2 


#*# NO PAGE CROSS 


*** 




F15C 


C9 AA 


441 




CMP #*AA 


DATA MARK 2? 






F15E 


DO F2 


442 




BNE RSYNC 1 


(IF NOT. IS IT DM1?) 




F160 


AO 55 


443 




LDY »tS5 


INIT NBUF2 INDEX. 






F162 






444 * 




(ADDED NIBL DELAY) 






F162 


BD 8C 


CO 445 RD3 




LDA Q6L. X 






F165 


10 


FB 


446 


BPL 


R03 i *»* NO PACE CROSS 1 *** 






F167 


C9 


AD 


447 


CMP 


••AD . DATA MARK 3? 






r-169 


DO 


E7 


448 


BNE 


RSYNC 1 . (IF NOT, IS IT DIM"') 






F16B , 






449 » 


iCAPRY SET IF DM3 1 ) 






F16B 


BD 


8C CC 


450 RD4 


LDA 


G6L. X 






F16E 


10 


FD 


451 


BPL 


RD4 , »** NO PACE CRUSS' *** 






F170 


99 


03 03 


45i 


STA 


NBUF2, Y .STORE BYTES DIRECTLY 






Fl .'3 


AD 


EF FF 


453 


LDA 


INTERUPT ■ POLL INTERUPT LINE 






n /c. 


J 5 


8B 


4 '3 4 


ORA 


I MASK . (THIS MAY BE ■-"■■f'u TC- i'l.'Ai IDAIL POLL 




[ ■■ '■■ [•: 


i :■ 


40 


4i>5 


BPL 


GOSERV 






(•' '. .'A 


:-« 




•l^fc 


DFY 


. INDEX TO NEXT 






F17B 


10 


EE 


4t -7 


BPL 


RD4 






t 17D 


C9 




458 RD5 


INV 


. (FIRST TIME Y=0' 






M7F. 


BD 


8C CO 


459 RD5A 


LDA 


Q6L, X GET ENCODED BYTES OF NBL.F1 






■ \ v 1 


10 


FB 


4 to 


BPL 


RDDA 






'- I ?,3 


^9 


00 0. 


461 


:;i a 


NBUF1, Y 






i 18c 


AD 


EF Fl 


46;: 


LDA 


INTERUPT , POLL INTERUPT LINf 






F189 


05 


8B 


463 


ORA 


1MASK . (THIS MAY BE USED TO INVALIDATE POLL- 




F18B 


10 


2D 


464 


DPL 


GDSERV 






F18D 


CO 


E4 


465 


CPY 


#$E4 WITHIN 1 MS OF COMPLETION" 






f- 1 8F 


DO 


EC 


4c6 


BNE 


RD5 






F 1 9 t 


CR 




A*-r- 


INV 








Ft 9,: 


BD 


8C C . 


468 PD6 


LDA 


G6L. X ■ MO POLL FROM NOW ON 






F195 


10 


F3 


469 


BPL 


RD6 






F197 


99 


00 Or 


470 


STA 


NBUF1, V 






F19A 


C8 




471 


INY 


FINISH OUT NBUF1 PAGE 






y 1 9B 


DO 


F5 


4-V 


BNE 


RD6 


Y\ 




<~ 19D 


Bt) 


QC c- 


473 RDCKSUM 


LEA 


GbL, X . GET CHECKSUM BYTE 


^1 




Fl AO 


10 


FD 


,-, '4 


GPL 


RDCK5UM 






F1A2 


85 


96 


475 


STA 


CKSUM 




F 1 A4 


EA 




476 


NOP 


, EXTRA DELAY BETWEEN BYTES 




F1A5 


BD 


8C CC 


477 RD"-' 


LDA 


Q6L. X 




F 1 AK) 


10 


FB 


"fl 


BPL 


RD7 , *»» NO PAGE CROSS' *** 




f- 1 A A 


:9 


DE 


4"9 


crip 


**DE FIRST BIT SLIP MARK" 




F 1AC 


DO 


OA 


4H0 


3Nt: 


RDERR ' ERR IF (JOT) 






F1AE 
F1AF 


EA 
BD 


BC CC 


481 

4S2 RD8 


NOP 
LDA 


, DELAY 3ETWEEN NIBLS 
Q6L, X 




F1B2 


10 


FD 


483 


BPL 


RDB . *** NO PAGE CROSS' *** 




FIB4 


C9 


AA 


J 04 


CMP 


(**AA .SECOND BIT SLIP MARK" 




F1B6 
F1B8 


FO 
33 


5F 


435 

4c*o RDERR 


DFQ 
SEC 


PDEXIT ■ (DONE IF IT IS* 

. INDICATE 'ERROR EXIT' 






— ^ F1B9 
F1BA 


60 




487 
488 » 


RTS 


-RETURN FROM READ16 OR RDADR16 




r- JBA 


4C 


B3 f; 


409 GDSERV 


JMP 


SERVICE -GO SERVICE INTERUPT 
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F1BD 


491 it*************************** 






F1BD 


492 « 




# 






F1BD 


493 * 


READ ADDRESS FIELD 7 


* 






FIBD 


494 * 


SUBROUTINE 


# 






FH3D 


495 * 


U6-St:C'rOH FORMAT) 


# 






F1DD 


496 * 




* 






F1BD 


497 * ***#******* * #**•*# »*■*** »#«■*♦ 






F1BD 


498 * 




* 






F1BD 


4<-7& » 


READS VOLUME, TRAFI- 


* 






fibd 


'300 * 


AMD SECTOR 


* 






FIBD 


501 •» 




* 






FIBD 


502 * 


ON ENTRY 


* 






F1BD 


503 * 




* 






F1BD 


504 * 


XREG SLOTNUM TIMES *10 * 






flDD 


'305 * 




*r 






FIBD 


506 * 


READ MODE ''Got ■ G"'L 


tf 






f-lBD 


507 * 




* 






FIBD 


508 * 


ON EXIT 


* 






FIBD 


50'' * 




* 






FIBD 


510 * 


CARRY SET tF ERROR 


* 






f 1DD 


511 «- 




(.'■ 






i- 1 1? D 


51k" * 


IF NO ERROR 








? ■ ! r ■ v ' 


513 * 


A--RLG HOLDS *AA 


* 






riBD 


514 * 


Y-REG HOLDS *00. 


# 






FIBD 


515 h- 


X-REG UNCHANGED. 


* 






FIBD 


516 * 


CARRY CLEAR 


* 






r I DD 


5 1 " * 




» 






r" 1 r 


518 * 


CSSTV HOLDS CHK.SUN, 


«• 






F 1 3 ,'.• 


5 l c - * 


SECTOR. TRACI^ ANL 


* 






FIBD 


520 * 


VOLUME READ. 


* 






FIBD 


521 * 




* 






FIBD 


522 * 


USES TEMPS COUNT, 


* 






- 1BD 


52:- * 


LAST, C5UM, AND 


* 






t i r rs 


52 <* # 


4 BYTES AT CSSTV 


it 






' l ».< 'J 

F1.BD 


526 * 


EXPECTS - - 


* 






' IBD 


52"' * 




* 






FIBD 


528 * 


ORIGINAL 10-SECTOR 


* 






■' 1 15 D 


52*-' *■ 


NORMAL DENSITY' NIBLS 


* 






• 1BD 


53'" * 


(4-B m, ODD BITS. 


* 






f" IBD 


5 '..1 i * 


THEM EVEN 


* 






flBD 


532 * 




*• 






FIBD 


533 * 


CAUTION 


* 






FIBD 


534 ■* 




* 






flBD 


535 -* 


OBSFR'T;. 


* 






f- 1BU 


53o -> 


'NO PAGE CROSS' 


■a 






FIB!) 


53'"' * 


WARN INC':.-, ON 


* 






FIBD 


538 * 


SOME BRANCHES' ! 


« 






FIBD 


539 * 




* 






FIBD 


540 * 


ASSUMES 


* 






F 1 B L) 


541 * 




■* 






f 1 3 r: 


5 42 * 


i usec cycle Tirsr 


* 






r lHP 


543 * 




* 






FIBD 


£44 **■»*##***♦*************♦**** 






FIBD 


AO FC 545 RDADR16 LDY #*FC 








F1BF 


84 99 546 


STY COUNT ; ' 


MUST FIND' COUNT. 
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r- _ i c 


1 C8 


547 RDA5 


YN 


I NY 








r- - lC2 DO 04 


548 


BNL PDA1 


. LOU ORDER OF COUNT 




F1C4 


£6 


95 


549 


INC 


COUNT 




; (2K NIBLS TO FIND 




FlCii 


FT 


FO 


550 


BEG) 


RDERR 




. ADR MARK, ELSE ERR) 




L ' i ■: [-'■ 


BD 


8C CO 


551 RDA1 


LDA 


Q6L, X 




. READ NIBL 




■<- Uli 


10 


r""B 


552 


BPL 


RDA1 




. *** NO PAGE CROSC-; ' **■» 




ic;- 


>: -v 


*■. 


'•5.3 PDAT'Jl 


C MP 


#*D5 




, At.'R MARK 1? 




F- 1 CF- 


1>U 


FO 


554 


bnf: 


RDAPVN 




, (LOOP IF NOT) 




I'lDl 


EA 




555 


NOP 






i ADDED NIBL DELAY 




IOS 


BD 


80 CO 


55o RDAr'. 


LDA 


Q6L. X 








h ! .i '■> 


10 


L~ !i 




DPI. 


RDA,? 




, »» no page cros:-: : < -- <■ 




f i ,'■ 


>" "■' 


A A 


57 -- 


CMP 


#*AA 




■ ADR MARK 2"' 




- : : ,j-< 


"'O 


r '-' 


'- s c ,' 


Dl-lf.' 


rpasn; 




( IF NOT, IS IT AM; 




1 ID 13 


AQ 


03 


560' 


LDY 


#$3 




, INDEX FOR 4-BYTE F'E-U. 




f : dp 






':al * 




(ADDED NIBL DELAY1 




f i I'D 


?,D 


8C CO 


5fc2 RDA - 


LP A 


Q6L, X 








' h:- 


1 


FB 


'<6 j 


BF'L 


RDA j 




, «*■« NO PA.if. CR05'.-. ' 




. it.: 


c 


<?6 


5i. « 


r i<p 


**9 6 




, ADR MARK 3" 




r-' i [- -t 


rv.' 


F ' 


'0-, 


BMF. 


RDASN1 




' IF NOT, IS IT ACi 




F1E6 






566 * 


(LEAVES CARF 


V 


SET ! ) 




F1E6 


A9 


00 


567 


L DA 


#»0 




, INIT CHECKSUM 




F" 16£« 


B5 


B 1 ? 


568 RDAf L.D 


ST A 


CSUM 








(■■' ' fa 


:<o 


SO '.■ 


'■-.»9 RDA . 


:.UA 


C«6I . ■ X 




Ff-AD ODD BIT- flllj! 




k 1 1: ;.' 


10 


F n . 




."PI 


RO ••-.'» 




■■■-'*■ NO PAGE CPnw-3 ' 




i- 1 t.f- 


;v- 




'■ ' 1 


P'Oi. 


A 




• Al 1 C-N ODD 3 I TS , 1 I NT L iu 




FIFO 


8b 


95 


S ^".\ 


STA 


LAST 




, (SAVE THEM) 




f 1 FV! 


ED 


ac c ■ ■ 


'j- 3 RDA'. 


LDA 


Q6L. X 




, READ 'EVEN BIT NIEL 




f- )f" c .: 


10 


KB 


: 74 


PPL. 


RDA 5 




, **• NO PAGE CR035' »*»* 




(■IF'" 

f 1 1 - :. 


vy'v 


rj s 


< 


AM': 


L A-T 

Ci'.-'M 




MERGE ODD AND EVEN 13 ! r v 
STurtf DATA BYTF 




r" i f t-: 


■-<3 




5 'H 


DFV 










f 1FF 


10 


^, r 


57 ■> 


I.3P1. 


RDAFLD 




LOOP ON 4 6ATA BYTES 




F.-JOl 


.VH 


! ■■ >i 


'.' 0-J 


rAv 


RDfRP 




• IF FINAL CHECKSUM 
UUN/t.RO, THEN t'RPlJP 




t ' t ; .* 


- ■•■ 


j. '; 


KIV. 


1 \':f. 


■V.-.i X 




F IF'F.T BIT- SLIP NIBl. 
in-* MO PAIf-: CROSS ' »t<; 




F.'.'C'V 


C V 


("..'- 


5^4 


LI1P 


#*Dt: 








F^Ofci 


DO 


AH 


'- .;'.' 


BNt: 


RDEFR 




ERROR IF NONMATCH 




> ..'00 


■' -j 




':Se> 


SET 






DELAY (NO INTERUPTS FROM NOU ON) 




1 .'-.-OK 

■ . 1 1 


n o 


c P 




: . DA 
K" ; . 


RDA ' 

*»*,"- A 




SECOND BIT-SLIP IN 1 131 
<■*■* NO PAGE CROSS : **- 




' 01 '< 

f. _:• i ■• 


18 


A1 


'..VI RDF » , T 


KNE 

CLC 


RDt'.RR 




ERROR IF NONMATCH 
CLEAR CARRY ON 




! L iS 


to 




:>V2 WEx 1 


P IK 






NORMAL READ EXITS 




F219: 
F219 








CHN 


kwt:-;2 












3 • 






• 






f:.M9 






4 * 


WR I TE~ 


SUBR 


* 






* 2 I'? 






b * (16- 


SECTOR 


FORMAT) 


* 






1 .-? ; °> 






6 » 






* 






F219 






7 *•»*********#***-»****«*#* 






C2H 






8 * 






• 






F219 






9 » WRITES DATA FROM 


* 






; '::i' 






1 * NDUF 1 AND NBUF2 


* 






: _ » j cj 






J 1 * 

1.-: * FIRST NB'OF 


a. ■ 


* 






F219 






13 » 


HIGH TO LOW. 


• 






F219 






14 » THEtN 


NDUF1 


, 


* 






> 219 






15 * 


LOW TC 


HIGH 


* 






* .-:i c > 






] L ? * 






■tt- 






^i" 






1 -1 ^ — — 


ON EN 


TRY 


* 






•,-;i" 






13 * 






* 






F219 






19 » X-REG SLOTNUM 


• 






F219 






20 * 


TIMES *10. 


* 






F219 






21 » 






* 






-31'-' 






22 * 






* 






• 21 ^ 






'."■I * 


ON E> 


IT 


# 






f.:ii-- 






74 - 






* 






F21<* 






25 * CARRY SET 


IF ERROR 


* 
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37 


38 




F219 






26 * (W PROT VIOLATION) * 






F219 






27 • * 






r,? 1 9 






2d * IF MO LRRUR. * 






F219 






,i9 * «" 






F219 






30 * A-Re>.- UNCERTAIN * 






F219 






31 » X-REG UNCHANGED * 






F219 






32 * Y-REG HOLDS »00 * 






F219 






33 * CARRY CLEAR * 






F219 






~i4 * * 






F219 






35 . ASSUMES * 






F219 






V, * * 






F219 






37 « 1 USEC CYCLE TIME * 






F219 






33 • ■ * 






T219. 






39 ♦ »•**»**•*•**■»»**■*•»*♦#***** 






F2W 


38 




flu WRITF.16 She .ANTICIPATE UIPROT FRH 




f;:ia 


lid 




4i c; v to indicate: WRITE PROTECT FRPOR INSTEAD OF 




F21B 


BD eo • 


;r. 


42 L.Y. QfcH. X 


INTERUPT 




F21E 


BD BE CO 


43 LfiA Q7L, X i SENSE WPROT FLAG 




F221 


30 F5 




44 Bit 1 WEXIT .BRANCH IF NOT WRITE PROTECTED 




F223 


A9 FF 




45 WRT1 LI. A #*FF , SYNC DATA. 




f-225 


91. 8F CO 


46 STA Q'.'H X 


<5> GOTO WRITf MODE 




F 22H 


ID SC CO 


47 GRA QfcL, X 


(4) 




f:?2b 


AC 04 




4S LOY #*4 


(2) FOR FIVE N1BLS 




F22D 


EA 




49 NOP ; <2) 




F22E 


4a 




50 PHA i (4) 




F22F 


68 




51 PLA . <3) 




Fc."JO 


48 




^2 WSYNC Pi 'A , ( 


4) EXACT TIMING 




F r.' 3 1 


k ~- 




■\J P> A , ( 


3) EXACT TIMING 




r- ;.:;;. 


20 ed f; 


',4 SH WNIUL7 , ( 


13, 9. 6) WRITE SvNC 




F235 


88 




55 Dfc'Y ■• < 


2) 




F236 


DO FS 




56 BNE WSYNC . < 


2») MUST NOT CROSS PAGE' 




F238 


A" D5 




57 LDA #*D5 , ( 


2) 1ST DATA MARK 




F23A 


20 BC 


~ni 


58 JSP WN1BL9 . ( 15, 9. 6) 




F23D 


A 9 A A 




59 LDA #»AA , ( 


2) 2ND DATA MARK 




F23F 


20 DC 


F2 


60 JSR WNIBL9 


(15,9,6) 




F242 


A9 AD 




61 LDA MAD 


(2) 3RD DATA MARK. 




F244 


20 BC 


F2 


62 JSR WNIBL9 


( 15, 9, 6) 




F247 


AO 55 




63 I..DY #*55 


(2) NBUF2 INDEX 




F249 


EA 




64 NOP 


(2) FOR TIMING 




F24A 


EA 




65 NOP 


(2) 




F24B 


EA 




66 NOP 


(2) 




F24C 


DO 08 




67 BNE VRYFRST 


(3) BRANCH ALWAYS 




F24E 


AD EF 


FF 


68 WINTRPT LDA INTERUPT 


(4) POLL INTERUPT LINE 




F251 


05 8B 




69 OR A I MASH 


(3) 




F253 


EA 




70 NOP 


(2) 




F254 


10 5D 




71 BPL SERVICE 


(2) BRANCH IF INTERUPT HAS OCCUR ED 




F256 


30 00 




72 VRYFRST BMI WRTFRST 


(3) FOR TIMING 




F25B 


B9 02 


03 


73 WRTFRST LDA_ NBUF2, Y 


; (4) ... 




F25B 


9D 8D 


CO 


74 STA Q6H, X 


(5) STORE ENCODED BYTE 




F25E 


BD 8C 


CO 


73 LDA Q6L. X 


(4) TIME MUST = 32 US PER L'r'TE' 




F261 


88 




76 DEY 


(2) 




F262 


10 EA 




77 BPL WINTRPT 


(3) (2 IF BRANCH NOT TAKEN) 




F264 


98 




78 TYA 


; (2> INSURE NO INTERUPT THIS BYTE. 




F265 


30 03 




79 BML...WMJ.PLE. 


, (3) BRANCH. ALWAYS 




F267 


AD EF 


FF 


80 WNTRP-fl LDA INTERUPT 


, (4) POLL INTERUPT LINE 




F26A 


05 8B 




81 WMIDLE ORA 1MASK 


, (3) 




F26C 


EA 




82 NOP 


, (2) 




F26D 


30 02 




83 "" " BMI WDATA2 


i <3> BRANCH IF NO INTERUPT 




F26F 


10 42 




84 DPL SERVICE 


i GO SERVICE INTERUPT. 




F271 


C8 




85 WDATA2 INY 


; (2) 




F272 


~B9 00 


~6'2 


86 LDA NBUF1.Y 


i (4i 




F275 


9D 8D 


CO 


87 STA Q6H, X 


. (5) STORE ENCODED OYTE 




F278 


BD 8C 


CO 


88 LDA Q6L. X 


i (.4) 




F27B 


CO E4 




89 CPY #*E4 


i (2) WITHIN 1 MS OF COMPLETION? 




F27D 


DO E8 




90 BNE WNTRPT1 


i (3) (2) NO KEEP WRITTINC AND POLLING 




F27F 


EA 




91 NOP 


; (2) 




F280 


C8 




92 INY 


; (2) 




F281 


EA 




93 WDATA3 NOP 


, (2) 




F282 


EA 




94 NOP 


; < 2 ) ..._.. 




F283 


:48 




95 PHA 


i (4) 




F284 


: 68 




96 PLA 


; (3) 




F28S 


: B9 00 


02 


97 LDA NBUF1.Y 


i (4) WRITE LAST OF ENCODED BYTES 
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39 








40 




rasa- 9D 


8D 


CO 


98 


STA 


Q6H, X 


i (5! 


WITHOUT POLLING INTERUPTS. 




K2BB- BD 


8C 


CO 


99 


LDA 


Q6L, X 


, (4) 






F2SE A5 


96 




1 00 


LDA 


CKSUM 


: (31 


NORMALLY FOP TIMING 




F290: C8 






101 


I NY 




i (2) 






F291 DO 


EE 




102 


BNE 


WDATA3 


; (3) 


(2) 




F293: FO 


00 




103 


UEQ 


WRCKSUM 


. (3) 


BRANCH ALWAYS 




FJ'95 20 


BD 


F? 


104 WPCKiiUM JSR 


WNJBL7 


: (13, 


9,6) GO WRITE CHECK. SUM'' 




F298 . A 9 


DE 




1 05 


LDA 


#*DE 


■ (2) 


DM4, BIT SLIP MARK 




F29A 20 


BC 


F? 


1 06 


JSR 


WNIBL9 


, ( 15, 


9, 6) WRITE IT 




F29D: A9 


AA 




107 


LDA 


#tAA 


. (2) 


DM3, BIT SLIP MARK 




F29F 20 


BC 


Fit 


103 


JSR 


WNIBL9 


, (IS, 


9,6) WRITE IT. 




F2A2 A9 


EB 




109 


LDA 


#*EB 


, '21 


DM6, BIT SLIP HARK 




F2A4 20 


BC 


f; 


1 3 


JSR 


WNIBL9 


( 1 "v 


9,6) WRIVt: IT 




f-;.'A7. A9 


FF 




1 1 1 


LDA 


#*FF 


< .•' ■■ 


TURN-OFF 3'Tt: 




r-'<iA9 20 


BC 


f- 


i n: 


JSR 


WNIBL9 


, V, 


9.9) WRITF. 11 




F2AC: Bl) 


3E 


CO 


1 1 3 NOWR I TE I. DA 


Q7L, X 


i OUT 


OF WRITE MODF 




F2AF: BD 


8C 


CO 


114 


LDA 


Q6L. X 


■ TO READ MODE. 




F2B2: 60 






115 


RTS 




i RETURN FROM WRITE 




F233: 






1 16 * 












F2B3 38 






1 1 / SERVICE SEC 




; TREAT INTERUPTION AS ERROR 




F2B4: 2C 


54 


F3 


118 


BIT 


SEV 


iSET VFLA8 TO INDICATE INTERUPT 




F2B7 20 


AC 


F2 


119 


JSR 


NOW LIE 


.TAKE 


IT OUT QF WRITE MQDE' 




F2BA 58 






120 


CI. [ 




•COULD NOT HAVE GOT HERE WITHOUT CL I OK 




r«-:BB c-Ci 






! ."•' 1 


RT3 










f::i*c 






i;_T: "***•*»***»•*•*»** + *»♦»***»*•* 






F'^BC 






123 ♦ 






* 






F2BC. 






124 » 


7-BIT NIBL WRITE SUBPS * 






F2Bf 






123 * 






• 






k:-:B' 






'. ct O • 


A-REC OR 


D PHI OR EXIT * 






> ./'IK 








CASRi 


CLEARED 


* 
* 






F2UC 






129 ***************************** 






f-L'PC 18 






130 WN1BI 9 CLC 




i (2) 9 CYCLES, THEN WRITE 




F?BD 48 






131 WNIPI.7 PHA 




i (3) 7 CYCLES. THEN WRITE 




f .->Vjf- .;, l 






1 "ii 


PL." 




. (4) 






■ ; ?< ~n> 


RH 


c ■::• 


i :).; wni in :. ta 


G6H. X 


, (5) NIBL WRITP. SUE 




■ .-■■«. «' 1 D 


C .<C 


1_ - 


'. "<« 


RA 


Qf.L, X 


i (4) CLOBBERS ACC NOT CAWt- , 




I-'rjCS 60 






13b 


RTS 










F2C6 






136 * 












F2C6 
F2C6 






139 • 






» 






F : 2C6 






140 » 


"PRENIBLIZE SUBR 


• 






F2C6 






141 » 


(16-SECTOR FORMAT) « 






*".-.'Ci> 






142 * 






• 






F2C6. 






143 *•**<•****••*•*•*•«•*•••••••* 






F2Cft 






144 # 






» 






J-2C6 






145 * 


CONVERTS 


256 BYTES 


OF * 






f- ?.<: <> 






146 * 


USER DATA 


IN (BUF) 


INTO * 






f- ,.\"6 






147 • 


ENCODED BYTES TO BE * 






f- ;;c t, 






148 * 


WPITEN DIRECTLY TO 


DISK » 






F2C6 






149 « 


ENCODED CHECK SUM 


IN ♦ 






F2C6 






150 • 


ZERO PAGE 


'CKSUM' 


• 






f;;C6 






151 * 






* 






c .-!Ci 






152 * 


ON 


ENTRY -- 


» 






F 2C 6 






153 » 






* 






f- r;c 6 






154 ♦ 


Hl'F IS 2- 


<YTK POINTER * 






F2C6 






155 » 


TO 256 


BYTES OF 


USER * 






F2C6 






156 » 


DATA 




• 






F2C6 






157 • 






* 






r:-X6 






158 * 


ON 


EXIT 


-- * 






r-;:co 






159 * 






* 






r-"2C<i 






160 » 


A- Rf(i CHECK SUM 


• 






F2C6. 






161 * 


X-REG UNCERTAIN 


• 






F2C6 






162 • 


Y-REQ HOLDS 


• 






F2C6 






163 » 


CARRY SET 




» 






K2C6 






16* » 






* 






F2C6 






165 ***»»»« ********************* 






F2C6 Ai 


02 




16c PRENIB16 l.DX 


**2 


i START 


NBUF2 INI EX 




F2C8 AC 


00 




167 


LDY 


•0 


i START 


USER BUF INDEX. 




F2CA. 88 






168 PRENIB1 DEY 




i NEXT 


USER BYTE 




F2C8 Bl 


9B 




169 


LDA 


( BUF ) . Y 








P2CD 4^ 






170 


l.SR 


A 


. SHIFT 


TWO BITS OF 




F-AK 3fc 


01 


03 


171 


ROl. 


NBUF2-1. 


X ■ CURRENT USER DYTE 


k 
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41 






42 




F3D1 4A 






1 '2 


LSR 


A 


INTO CURRENT NBUF2 




F2D2 3E 


01 


03 


173 


ROL 


NBUF2-1. X ■ 


BYTE. 




F2D3 99 


01 


02 


174 


STA 


NBUF1 + 1, Y i 


(6 BITS LEFT) 




F2DB E8 






175 


INX 




FROM TO »5S 




J-2D9 EO 


56 




I 7fc 


CPX 


#*56 






f;:db 90 


ED 




J 7'.- 


PCC 


PREN1B1 


BP IF NO WRAPAROUND 




K2DD a;: 


00 




1 "'8 


LDX 


«C 


RESET NBUF2 INDEX 




F2DF 98 






179 


TYA 


, 


USER BUF INDEX 




F2E0 DO 


E8 




180 


ONE 


PRENID1 


(DONE IF ZERO) 




F2E2 AO 


36 




181 


LDY 


#*36 


i (ACC-O FOR CHECK SUM) 




k;-:E4 159 


00 


03 


182 PREN1D3 


K09 


NBUF2-2 y 


. OUMDINE WITH PREVIOUS 




t ::e7 2" 


3F 




IP3 PRENID2 


AND 


• S3F 


; STP IP GARBAGE CITS 




F2E9 AA 






184 


TAX 




. T,J FORM RUNNING CKCOK SUM 




F2EA BD 


55 


F3 


18? 


l.DA 


NIBL. X 


. GET ENCODED EQUIV 




F2ED 9V 


01 


03 


186 


STA 


NBUF2-1, Y 


; REPLACE PREVIOUS 




F2F0 B9 


00 


03 


187 


LDA 


NBUF2-2, Y 


i RESTORE ACTUAL PREVIOUS 




VZV2 88 






188 


np.'Y 








r.-:r-4 00 


EE 




lO* 


3 NIC 


PR EN I B3 


.LOOP UNTIL ALL OF NBUF2 16 CONVERTED 




( : ;;-"t 29 


:<f 




1«5C 


ANT' 


»*JF 






f;;f8 59 


01 


02 


191 PREN1B4 


EOR 


NBUF1+1, K 


, NOW DO THE SAMP FOP 




F2FB: AA 






192 


TAX 


, 


NIBBLE BUFFER 1 




F2FC BD 


33 


F3 


193 


LDA 


NIBL, X 


i TO DO ANY BACK TRACKING INtiUFl-li 




F2FF 99 


00 


02 


194 


STA 


NBUF 1 . V 






F302 B9 


01 


o;: 


19? 


LDA 


NH'JF 1 + 1 Y 


•RECOVER THAT WHICH IS NOW 'PREVIOUS' 




F--305: C8 




194 


INY 








F306; DO.FO 


197 


BNE 


PREN1B4 


- . _ 




F30G AA 




198 


TAX 




i USE LAST AS CHECK SUM 




F-W9 13 


55 F3 


199 


L.DA 


NIBL, X 






r?.r<c 85 96 ___ 


200 ._ 


STA 


CKSUM 






F 30E 4C 4C F3 


201 


JMP 


SET 1 MEG 


; ALL DONE. 

,.44. -p.-* 




F31 1 
F31J 






204 • 






* 




Fill 






203 * P0STN1BLIZE SUBP 


■» 




Fill 






206 » It 


-SECTOR FORMAT 


* 




nu 






207 * 






» 




F311: 






208 #•****##**#♦*♦****»»•»****** 




F3U. ' 






209 » 










F311 AO 


35 




210 P0STNIB16 LDY #»53 


.FIRST CONVERT TO 6 BIT NIBBLES 




HIS A9 


00 




211 


LDA 


»*o 


, TNIT CHECK SUM 




\-3\5 be 


02 


03 


212 PNIPl.l 


1 D* 


NHUF2. Y 


'CFT ENCODED BYTF 




F31S. 5D 


00 


F3 


213 


i£OR 


DNIBL. X 






F31B 99 


03 


03 


214 


STA 


NUUF2, Y 


.REPLACE WITH 6 BIT EQUIV 




F31E 8B 






213 


DEY 








F31F 10 


F4 




216 


BPL 


PNIBL1 


J LOOP UNTIL DONE WITH NIBBl.F, BUFFER 2 




F321 ca 






217 


INY 




NOW Y«0 




F322 EC- 


00 


o; 


218 pmbl;- 


i I)/ 


NBUF 1 . Y 


, DO THE SAME: WlTn 




F325 5D 


00 


f:< 


;:r-> 


IMR 


IC'NIBL. X 






F32B 99 


00 


02 


220 


STA 


NBUF 1 , Y 


, NIBBLE BUFFER 1 




F32B C8 






221 


INY 




; DO ALL 256 BYTES 




F32C DO 


F4 




222 


BNE 


PNIBL2 






F32E A6 


96 




223 


LOX 


CKSUN 


, MAKE SURE CHECK SUM MAT(.'Hfv 




F330. 5D 


00 


F3 


224 


tCUR 


DNIBL- X 


BETTER HE Zr.fr 




F333 38 






225 


<5EC 




ANT ICIPATE F.PPOP 




F334 DO 


16 




226 


BNE 


POSTERR 


BRANCH IF IT IS 




F336 A3 


36 




227 P0ST1 


LDX 


#•56 


INIT NBUF2 INDEX 




F33B CA 






228 P0ST2 


DO 




NBUF IDX *55 TO *0 




F339 30 


FB 




229 


BMI 


P05T1 


WRAPAROUND TF UE r , 




F33B B9 


00 


03 


230 


L.DA 


NBUF1, Y 






(• 33E 3E 


02 


03 


231 


LSR 


N13UF2, X 


SHIFT 2 UPS FR0>| 




F34 1 2A 






232 


ROl. 


A 


CURRENT NBUF 2 NIBL 




F342: 3E 


02 


03 


233 


LSR 


NBUF2, X 


INTO CURRENT NBUF 1 




F343 2A 






234 


ROL 


A 


NIBL 




F346 91 


9B 




r!35 


iTA 


< HUF ) , Y 


BYTE OF USER DATA 




■F348 CG 






236 


1NW 




NEXT USER BYTE 




F'349 DO 


ED 




237 


BNl. 


POST 2 






F34B: 18 






238 


CLC 




; GOOD DATA 




F34C 






239 POSTERR EQU 


* 






F34C: AD 


DF 


FF 


240 SET 1 ME 


•. LDA 


ENVIRON 






i- 34F 09 


BO 




241 


OR A 


#ONErf.G 


.•;,[■. T TO ONE MEGAHERTZ C I >"X K RATE 




1 331 BD 


DF 


FF 


242 


STA 


ENVIRON 






F334 60 






243 SEV 


RT5 




. (SEV USED TO SET vK'l.AGi 
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43 






44 






F355: 








245 


»»*•**#*##*#•*#*■**•«■*■*■*****■•*•** 






F355: 








246 


* 




# 






t : - 3 u c, 








24 7 


# 


6 -BIT 


TO 7-BIT * 






F355. 








248 


* 


NIBL CONVERSION TABLE * 






F355: 








249 


* 




* 






F355: 








250 


♦ ■a******-* ■**#**•******-*****■*•* 






F355: 








251 


* 




* 






F355- 








252 


* 


CODES WITH MORE THAN * 






F355 








253 


* 


ONE PAIR 


OF ADJACENT * 






F355: 








254 


■«■ 


ZEROES 


OR WITH NO * 






F355- 








255 


# 


ADJACENT 


ONES (EXCEPT * 






F355: 








256 


* 


37) ARE EXCLUDED. * 






F355: 








257 


* 




» 






F355: 








258 


#*#**#*******#*#***■**#*#*•** 






F355. 


96 


97 


9 A 


259 


NIF 


I. DFB 


*96, *97, *9A 






F358: 


9B 


91) 


9E 


260 




DFB 


*9B, *9D, *9E 






F- 35E . 


9F 


A 6 


A7 


261 




DFB 


*9F, *A6, *A7 






F35E£: 


AB 


AC 


AD 


262 




DFB 


*AB . *AC , *AD 






F361 : 


AE 


AF 


B2 






DFB 


*AE, *AF, *B2 






F364: 


B3 


34 


B5 


264 




DFB 


*B3. *B4. *B5 






F367. 


B6 


E7 


B? 


265 




DFB 


*E6, *B7, SE9 






F36A ; 


EA 


BB 


BC 


266 




DFB 


$BA, *B3, *BC 






F36D; 


BD 


BE 


BF 


267 




DFB 


*BD/ *EE, *BF 






F370: 


CB 


CD 


CE 


268 




DFB 


*CB, *CD, *CE 






F373: 


CF 


D3 


D6 


269 




DFB 


*CF, *D3, *D6 






F376- 


D7 


D9 


DA 


270 




DFB 


$D7, *D9, *DA 






F379 


1)13 


DC 


DD 


271 




DFB 


*DB, SDC, *DD 






F37C: 


PE 


DF 


E5 


272 




DFB 


*DE, *DF, *E5 






F37F. 


F.6 


E7 


E9 


273 




DFB 


$E6, $E7, *F.9 






F382' 


FA 


EH 


EC 


274 




DFB 


$EA, *EB, *EC 






F385: 


ED 


EE 


EF 


275 




DFB 


*ED, *EE- *EF 






F388: 


F2 


F3 


F4 


276 




DFB 


$F2, 4F3, *F4 






F-"38D 


F5 


F6 


F7 


277 




DFB 


*F5, *F6. $F7 






F38E. 


F9 


FA 


FB 


278 




DFB 


$F9, *FA, -SFE 






F391 


FC 


FD 


FF 


279 




DFB 


*FC. *FD, *FE 






F394 


FF 






280 




DFB 


*FF 






F395: 








282 


■it************************* 






F395: 








283 


* 




* 






F39 5 








284 


* 


7-BIT 


TO 6-BIT * 






f.: -> (.j a. . 








235 


* 


•DENIDLIZE' TABL * 






F.3^ 1 ? 








r?3ft 


* 


■s L6-3ECT0R FORMAT > * 






F395 








287 


* 




* 






F395 








288 


* 


VALID CODES * 






F395 








289 


* 


*96 TO 


*FF ONLY. * 






F3-V';i 








2<?0 


tt 




* 






r-.^v 1 - 








2 C ?1 


* 




u 






f ' ' :■ ^ '? 








'■Jl^r. 


«■ 


CODE'S WITH MOPE THAN * 






F3V5 








293 


* 


ONE PAIR 


OF ADJACENT * 






F395 








294 


* 


ZEROES OR WITH NO * 






F395 








295 


* 


ADJACENT 


ONES (EXCEPT * 






F395 








296 


•» 


BIT 7) ARE EXCLUDED * 






F395 








297 


* ♦■#**** **•***#****■«•■*■* **•»■*** 






F395 


00 






298 




BRK 


ONE 3YET I 


_EFT "OVER 




F300 








299 


DN1BL EQU 


REGRWT5+*300 






F396 


00 


01 


98 


300 




DFB 


♦00/ *01, *98 






F399 


99 


02 


03 


301 




DFB 


♦99, *02, »03 
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46 




F39C 


9C 


04 


05 


302 








dfb" 


*9C, 


V04,"*05 






F39F 


06 


AO 


Al 


303 








DFB 


$06. 


*A0, *A1 






F3A2 


A2 


A3 


A4 


304 








DFB 


*A2, 


*A3 'tA4 






F3A5 


A5 


07 


08 


305 








DFB 


*A5, 


$07, *08 






F3AB 


AS 


A9 


AA 


306 








DFB 


*A8, 


*A9, *AA 






F3AD 


09 


OA 


OB 


307 








DFB 


$09, 


*0A, *0B 






F3AF 


oc 


OD 


BO 


308 








DFS 


toe* 


*0D, *B0 






F3B1 


ei 


OF. 


OF 


30 l > 








DFB 


*B1 , 


*0E. *0F 






F3B4 


10 


1 1 


12 


3 1 








DFB 


*10, 


4 1 1 , $ 1 2 






F3E7 


: 13 


B8 


14 


31 1 








DFB 


*13, 


*B8, $14 






F3Kh 


15 


16 


17 


312 








DFB 


*15, 


*16, *17 






F3BL 


18 


19 


1A 


313 








DFB 


*18. 


$19, *1 A 






r-'3C C 


CO 


C 1 


C 2 


314 








DFB 


*C0. 


*c i AC :■:. 






■-3C? 


C3 


C4 


C5 


3 1 c ' 








DFB 


*C3, 


*C4. *C5 






f ; 3C 6 


6 


C7 


C3 


"< 1 .*-. 








DFB 


*C6 


*C7 %ce 






F3C9 


C9 


CA 


IB 


317 








DFB 


*C9, 


*CA, *1B 






F3CC 


CC 


1C 


ID 


318 








DFB 


*CC, 


*1C, *1D 






F3CF 


: IE 


DO 


Dl 


319 








DFB 


*1E, 


*D0, *D1 






F3D2 


D2 


IF 


D4 


32<J 








DFB 


*D2, 


*1F. *D4 






'3D '5 


D5 


20 


2 1 


321 








DFB 


SD5. 


$20- *21 






F3DB 


DS 


22 


d 3 


T t> '."• 








DFB 


*D8.- 


$22: *23 






F3DB 


: 24 


25 


26 


323 








DFD 


*24, 


$25, *26 






F3DE 


27 


28 


EO 


324 








DFD 


♦ 27. 


*28.. *E0 






F3E1 


: El 


E2 


E3 


325 








DFB 


*F1. 


*E2, *E3 






f : 3E4 


E4 


29 


2A 


326 








DFB 


*E4, 


*29. *2A 






f 3E -' 


2B 


E8 


2C 


327 








DFB 


*2D ■ 


$E8. %2Z 






F3EA 


2D 


2E 


2F 


328 








D^B 


*2D.- 


*2E- t"-F 






F3ED 


: 30 


31 


32 


329 








DFB 


*30. 


$31. *32 






F3F0 


FO 


Fl 


33 


330 








DFB 


*F0. 


*F1, *33 






F3F3 


34 


35 


36 


331 








DFB 


$34, 


$35.. $36 






F3F6 


n 7 


3 c 3 


Fa 


332 








Dhii 


*37. 


*36, *K3 






F3F9 


39 


3A 


3D 


333 








DFB 


$39, 


$3A- t'JJi 






F3FC 


. 3C 


3D 


3E 


334 








DFB 


*3C , 


*3D, *3E 






F3FF 


: 3F 






335 








DFB 


*3F 








F400: 








337 


»»»*»»»»***#»*•»* **■«■*•***#** 






F400: 








338 


» 










* 






F400: 








33? 


* 


FAST SEEK SUBROUTINE • 






F400: 








340 


« 










« 






F400: 








341 


**•*»♦#**# *****■**•»■*♦***•*■##* 






F400: 








342 


* 










# 






F400: 








343 


» 




— 


ON ENTRY — 


— * 






F400. 








344 


* 










« 






F400- 








345 


* 


X- 


•REG 


HOLDS 


SLOTNUM * 






F400 








346 


■» 






TIMES *10. 


* 






F400 








347 


# 










# 






F400 








348 


* 


A- 


-REG 


HOLDS 


DESIRED * 






F400 








349 


* 






HALFTRACK. 


* 






F400 








350 


* 






(SINGLE PHASE) * 






F400 








351 


« 










» 






F400 








352 


* 


CURTRK HOLDS CURRENT # 






F400 








353 


* 






HALFTRACK 


* 






F400 








354 


# 






flfct C? V 




* 






F400 








355 


* 














F400 








356 


* 










* 






F400 








357 


* 


A- 


-REG 


UNCERTAIN. 


* 






F400 








35B 


» 


Y- 


-REG 


UNCERTAIN. 


# 






F400 








35? 


» 


X- 


-REG 


UNDISTURBED 


* 






F400 








360 


* 










* 






F400 








361 


* 


CURTRK AND TRKN HOLD * 






F400 








362 


* 




FINAL HALFTRACK. * 
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48 




F400 








363 


♦ 








* 




F400 








364 


* 


PRIOR HOLDS PRIOR 


* 




F400 








365 


♦ 




HALFTRACK IF SEEK 


* 




F400 








366 


* 




WAS REQUIRED 


» 




F400 








367 


* 








* 




F400 








368 


* 


MONT I MEL 


AND MONTIMEH * 




F400 








369 


* 




ARE INCREMENTED BY * 




F400 








370 


* 




THE NUMBER OF 


* 




F400 








371 


» 




100 USEC QUANTUMS 


* 




F400 








372 


» 




REQUIRED BY SEEK 


♦ 




F400 








373 


•» 




FOR MOTOR ON TIME 


* 




F400 








374 


» 




OVERLAP 




♦ 




F400 








375 


» 








* 




F400 








376 


« 


— - 


■ VARIABLES USED - 


— « 




F400 








377 


* 








■rt 




F400 








378 


* 


CURTRK, TRKN, COUNT 


, * 




F400 








379 


* 




PRIOR, 


SLOTTEMP 


* 




F400 








380 


* 




MONT I MEL, MONTIMEH * 




F400 








381 


♦ 








* 




F400 








382 


»«-**-»«■»*»■**♦#•«■*■*««■*■**+♦•**■* 




F400 


85 


9E 




383 


SEEK. 


STA 


TRKN 


, SAVE TARGET TRACK. 




F402 


C5 


8C 




384 






CMP 


CURTRK 


i ON DESIRED TRACK? 




F404 


FO 


42 




385 






BEG 


SETPHASE 


; YES, ENERGIZE PHASE AND RETURN 




F406 


A9 


00 




386 






LDA 


#*0 






F408 


85 


95 




387 






STA 


TRKCNT 


; HALFTRACK COUNT. 




F40A 


A5 


8C 




388 


SEEK 


LDA 


CURTRK 


i SAVE CURTRK FOR 




F40C 


85 


9D 




389 






STA 


PRIOR 


, DELAYED TURNOFF. 




F40E 


38 






390 






SEC 








F40F 


E5 


9E 




391 






SBC 


TRKN 


; DELTA-TRACKS. 




F411 


FO 


31 




392 






BECi 


SEEKS ND 


, BR IF CURTRK=DESTINATTON 




F413 


BO 


06 




393 






BCS 


OUT 


(MOVE OUT. NOT IN' 




F415 


49 


FF 




394 






EOR 


#*FF 


CALC TRKS TO GO 




F417'E6 


8C 




395 






INC 


CURTRK 


INCR CURRENT TRACK (IN) 




F419 90 


04 




396 






BCC 


MINTST 


(ALWAYS TAKEN) . 




F41B 6° 


FE 




397 


OU 


i 


ARC 


#*FF 


CALC TRKS TCI GO 




r 4 1 1) c 6 


ac 




398 






DEC 


CURTRK 


DECK CURRENT TRACK <0U 1 




F4 1F CH 


V5 




3<J«J 


MI 


IT , 


: t r nr 


TRKCM 






FA21. 90 


02 




400 






BCC 


MAXTST 


AMD TRKS MOVED ' 




F423 AS 


95 




401 






LDA 


TRKCNT 






F425 C9 


09 




402 


MAXTST CMP 


#*9 






F427 BO 


02 




403 






n i.' s 


step 2 


IF TWkCNT". SB LEAVE V /''LONE ' Y = *B '< 




F429 AG 






404 


<^T[-r- 


T AY 




ELSE SET ACCELERATION IMPE' IN > 




F42A 38 






405 






:;e>; 








F42B 20 


48 


F4 


406 


STEPc JSR 


SETPHASE 






F42E B9 


67 


F4 


40 7 






LDA 


ONTABLE, Y 


, FOR 'ONTIME' 




F431 20 


56 


F4 


408 






JSR 


MSWAIT 


. (100 USEC INTERVALS) 




<-4 34 AS 


9D 




409 






LDA 


PRIOR 






r •rift, is 






4 1 






Cl.A 




, FOR PHASEOFF 




f •»:■"■ 20 


4A 


F4 


4! 1 






jsr 


CLRPHASE 


TURN OFF PRIG" FHA1-F 




K4 3A B9 


~0 


F4 


412 






LDA 


OFFTABLE, Y 


THEN WAIT ' OFF TIME ' 




F43I) 20 


56 


F4 


413 






JSP 


MSWAIT 


(100 USEC INTERVALS) 




F440 E6 


9S 




414 






INC 


TRKCNT 


'TRACKS MOVED' COUNT 




r 44;.' DO 


C6 




4 1 •:• 






UNE 


SEEK 2 


(ALWAYS TAKEN' 




F4 44 20 


56 


f-"4 


41c 


<3F 


ivx 


ND J 5" 


MSWAIT 


SETTLE 2b MSEC 




r-'44 ' 18 






4 1 - 






etc 




, SET FOR PHASE OFF- 




F448 A5 


8C 




418 


SETPHASE LDA 


CURTRK 


GET CURRENT TRACK 




F44A 29 


03 




419 


CLRPHASE AND 


#3 


MASK FOR 1 OF 4 PHASES 




F 44C 2 A 


■:. , 




420 

4 ■' 1 






ROL 
OH m 


A 


DOUBLE FOR PHASEON/OFF IIIDEX 




f "<I4F A A 






4.-12 






TAX 








F 4«X> BI) 


iO 


CO 


4;-.:' 






LDA 


FHASEOFF, X 


. TURN ON/OFF ONE PHASE 




F453. A6 


81 




424 






LDX 


IBSLOT 


RESTORE X-REG 




F455- 60 






425 


SEEKPTS RTS 




AND RETURN 




F -V;.,- 






\2'7 


#* ■=- 


>******♦***■«•* **»#****** 




f '■' <i 'i & 






428 


*■ 
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MSWAIT SUEirTjUTINr * 
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w 38 
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445 
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Mf;.,-. St'.''. 






i -.■;.'' fa-? 


i 






SB-- «*;. 0:J-!F:. r-> i r- 


[Pi :;, .;, ' 




i-4-. 4 D'.' 


■ ' 




■ V '" 


f?NF". r-'-.WAIT •. A--Rt':0 '4Jijr 


; L *. f 




•i'-->o '/.-. 






■ r '.■ : 


'■ '.' ■ 






F467: 






474 


********#**********-»****-M-* 






F467: 






475 


» * 






F467- 






476 


* PHASE ON-, OFF-TIME * 






F4o".' : 






477 


* TABLES IN 100-USEC * 






F4c-,"' 






478 


* INTERVALS (SEEK) * 






F467 : 






479 


* * 






F467: 






480 


#■*■*■»**#**#■**#*♦*#•»■« ******* 






F467: Ot 


30 


28 


481 


ONTABLE DFB 1 , *30, »28 






F46A 24 


20 


IF. 


482 


DFB *24, *20, *1E 






F--46TD: ID 


IC 


IC 


483 


DFB *1D, *1C. *1C 






F4"'0. 70 


2C 


2o 


484 


OFFTABLE DFB *70, *2C;*26 






F473: 22 


IF 


IF 


485 


DFB $22. *1F.*1E 






F476 ID 


IC 


IC 


486 


DFB *1D,*1C.*1C 
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52 




F479: 86 


83 


488 


BLOCKIO STX 


IBTRK 




F47B: AO 


05 


489 




LDY. 


»»3 




F47D 48 




490 




PHA 






F47E OA 




491 


TPKSEC ASL 


A 




F47F 26 


83 


4^2 




RQl. 


IBTRK 




F481 88 




493 




DEY 






F462: DO 


FA 


494 




ONE 


TRKSEC 




F4B4 68 




495 




PLA 






F485 ^ c > 


Q~> 


496 




AND 


«*7 




F487 AS 




497 




TAY 






F488 09 


AC 


F4 498 




. L.DA 


SECTABL, Y 




F48B: 85 


84 


499 




STA 


IBSECT 




F48D: 20 


00 


FO 500 




JSR 


REGRWTS 




F490: 130 


OB 


501 




BCS 


QUIT 




F492 E6 


86 


502 




INC 


IBBUFP+1 




F494 Eft 


84 


503 




INC 


IBSECT 




F496 E6 


84 


504 




[NO 


IBSECT 




F498 20 


00 


FO 505 




JSR 


REGRWTS 




F49B C6 


86 


506 




DEC 


IBBUFP+1 




F49D A5 


88 


507 


QU 


[T LDA 


IBSTAT 




F49F 60 




508 




R 7 3 






F4A0. 




509 


•» 








F4A0 




510 


5E 


:TADI FTi'.' 


* 




F4A0. 00 


04 


08 511 




DFC 


*0, *4. $8 




F4A3 CC 


01 


05 512 




DFI3 


*C, *1/ *5 




F4A6 09 


CD 


513 




DFR 


$9, *D 




r -v/-; 




5W 


* 








F4A8 




516 * * 


» * 


#*»•*** 


**»*»» 




F4A8 




517 * 






* 




F 4A8 




518 * 


.lOYS 


TICK. READ ROUTINE * 




F 4Ar5 




519 * 






# 




T'-m'-.-j 




"320 * * 


» it 


**■«**•* 


*«•»**» 




F4A8 




521 * ENTRY 


ACC= COUNT 


DOWN HIGH * 




F4A8 




522 * 




X!<Y= DON'T 


CARE * 




F4A8 




523 * 






* 




F4A8 




5:34 * FXP 


ACO= TIMER 


HIGH BYTE * 




F 4 Art 




^™ e i * 




Y= TIMER 


LOW BYTE * 




F4A8 




526 * 




CARR/ CLEAR * 




F4A8 




527 * 






» 




F4A8 




528 » 


IF 


CARRY SET, ROUTINE * 




F4AQ. 




529 » 




WAS INTER UP TED fc ♦ 




F4AF3 




'330 «- 


f,i 


.;" .'. V ARE INVALID * 




F4A8. 




531 * * 


> u 


^ > * ^ * * 


***•■*»■* 




F4A8 




532 * 










FFD9 




533 TIMLATCH EQU *FFD9 






FFD8 




534 TIMER1L 


EQU *FFDB 






FFD' 1 




535 TIMERIH 


EQU »FFD9 






>IO0 , £-< 




536 JGYF 


I'.'Y 


F-jl.l *C066 






F4A- 




53'.' * 










f-'4A. 




538 ANAI. 


OG 


F.Gl' * 


, CARRY SHOULD DE SET 1 




F4AB SD D 


9 FF 


539 




STA TIMLATCH ; START THE TIMER! 




F4AR AD F.f FF 


540 ANL0G1 


LDA INTERUPT 




F4AF. 20 <■• 


.-., r _ 


541 




AND UOYRDY 


;WAIT FOR ONE OR THE OTHER TO GO LOW 




(•••.Fi _;<;• » 




";42 




BUI ANLOGl 






F4B 3 Ai. .-. 




543 




1. DA JUYRDY 


.WAY IT REALLY THE JOYSTICK,-- 




F 4!'.- 'v.? '. 




54 4 
545 




RMt GOODTIME . NOPE. FORGET IT 

CLC .TIME'S A SLIP SLIDIN AWAY 


F4Htf IB 




F4BV AL> D 


-V Fi- 


546 




LDA TIMERIH .NOW, WHAT TIME IS IT'' 




F4GC AC b 


tf FT 


547 




LDY T1MEP1L 




F413T 10 


i 


54 8 




DPI. GOODTIME .TIME WAS VALID' 




F4'I ' AD I 


9 ■"> 


549 




LDA TIMERIH , HI BYTE CHANGED 




F-4C4 -C 




550 GOODTIME KTS 






♦*» SUCCESSFUL ASSEMBLY. NO ERRORS 
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54 






F0fc"9 ALDONE 1 


FOEO AL.LDONE 


F119 ALLOFF 


■'F4A8 ANALOG 




F4AB ANLOG1 


7F479 BLOCK ID 


9B BUF 


F12D CHKDRV1 




F12B CHKDRV 


F13D CKDRTS 


96 CKSUM 


F44A CLRPHASE 




F050 CONWAIT 


F0C7 CORRECTSECT 


7F0BF CORRECTVOL 


95 COUNT 




97 CSSTV 


97 CSUM1 


89 CSUM 


8C CURTRK 




F300 DNIBL 


F031 DRIVSEL 


C08A DRVOEN 


85 DRVOTRK 




?C08B DRV1EN 


FOES DRVEflR 


F13E DRVINDX 


F03D DRVWAIT 




EO DVMOT 


FFDF ENVIRON 


9F ENVTEMP 


7F0A0 GOCAL 1 




7F0A1 GOCAL 


F4C4 GOODTJME 


7F116 GOSEEK 


F1BA GOSERV 




FOES HNDLERR 


80 HHDKRRS 


85 IBBUFP 


87 IBCMD 




32 IBDERR 


82 I53DRVN 


80 IBNODRV 


7 83 IBRERR 




B4 IBSECT 
83 IBTRK 


81 IBSLOT 
81 IBWPER 


89 IDSMOD 
8B I MASK 


88 IBSTAT 
FFEF INTERUPT 




8A IOBPDN 


C066 JOYRDY 


95 LAST 


F425 MAXTST 




F41F MINTS'!" 


9 A MONTIMEH 


99 MONT I MEL 


F04E MOTOF 




C088 MQTQROr-'K 


C089 NOrORQI-J 


F458 MSW1 


F461 MSW2 




F4 56 MSWA.IT 


F.105 MYSEEK 


0200 NBL'Fl 


0302 NBUF2 




F355 NIBL 


7F060 NODRIVERR 


F08B N0INTR1 


F0F3 N0INTR2 




F2AC HOWRITE 


F11C NXOFF 


F470 OFFTABLE 


F044 OK 




80 ONEMEG 


F467 ONTABLE 


F41B OUT 


C080 PHASEOFF 




70081 PHASEON 


?C081 FHASON 


7C080 PHSDFF 


F315 PNIBL1 




F322 PNIBL2 
F311 P0STNIB16 


i-J.fS POST 1 
F2CA PFfc'NIBI 


F338 F0ST2 
F2C6 PRENIB16 


F34C POSTERR 
7F2E7 PRENIB2 




F2E4 PRENIB3 
COBC G6L 
F14D RDl 
FIVE ROSA 
MAF RDS 
FlEA RDA4 
F1I3D RDADR16 
F19D RDCKSUM 
F143 READ 16 


F2F8 PRENIB4 
COBF Q7H 


9D PRIOR 
COSE Q7L 


C08D Q6H 
F49D QUIT 




F157 RD2 
F17D RD5 


F162 RD3 
F192 RD6 


F16B RD4 
F1A5 RD7 




F1C8 RDAl 
F1F2 RDA'f. 
F1E8 RDAFLD 
FIBS RDERR 
FOOO REGRWTS 


F1D2 RDA2 
F204 RDA6 
FICD RDASNl 
F217 RDEXIT 
93 RETRYCNT 


FIDD RDA3 
F20E RDA7 
FlCl RDASYN 
F0A7 RDRIGHT 
F152 RSYNCl 




F1"A RSYNC 


FOB" RTTRK 


F4A0 SECTABL 


98 SECT 




■■'F"106 5EEK1 
F444 CEEKEND 
F443 SETPHASE 

:f-4 r 29 STEP 


F40A SEEK 2 


94 SEEKCNT 


F400 SEEK 




7F455 SEEKRTS 

F125 SETTRK 

97 TEMP 


F2B3 SERVICE 
F354 SEV 
FFD9 TIMER1H 


F34C SET 1 MEG 
F42B STEP2 
FFD8 TIMER1L 




FFD9 TIMLATCH 
99 T R K N 1 


99 TRACK. 
F47E TRKSEC 


95 TRKCNT 
F086 TRYADR2 


9E TRKN 
F07F TRYADR 




F07B TRYTRK2 
F2 56 VRYF-RST 


F065 TRYTRK 


7F TWOMEG 


9A VOLUME 




F271 WDATA2 


F2B1 WDATA3 


F218 WEXIT 




F24E WINTRPT 


F26A WMIDLE 


7F2BF WNIBL 


F2BD WNIBt.7 




F2I3C UNIBL9 


F267 WNTRPT1 


F295 WRCKSUM 


F219 WRITE 16 




F0F9 WRIT 


7F223 WRT1 


F258 WRTFRST 


F230 WSYNC 




7F TWOMEG 


80 IBNODRV 


80 HRDERRS 


80 ONEMEG 




81 IBSl.DT 


81 IBWPER 


82 IDDERR 


82 IBDRVN 




83 I BR ERR 


83 IBTRK 


84 IBSECT 


85 DRVOTRK 




85 ICBUFP 


87 IBCMD 


88 IBSTAT 


89 CSUM 




99 IBSMOD 


8A IOBPDN 


8D I MASK 


8C CURTRK 




93 RETRYCNT 


94 SEEKCNT 


95 LAST 


95 TRKCNT 




95 COUNT 


96 CKSUM 


97 CSSTV 


97 CSUM1 




97 TEMP 


98 SECT 


99 MONT I MEL 


99 TRKN1 




99 TRACK 


9A MONTIMEH 


9A VOLUME 


9B BUF 




9D PRIOR 


9E TRKN 


9F ENVTEMP 


EO DVMOT 




0200 NBUF1 


0302 NBUF2 


C066 JOYRDY 


7C080 PHSOFF 




C080 PHASEOFF 


7C081 PHASON 


7C081 PHASEON 


C088 MOTOROFF 




C089 MOTORON 


C08A DRVOEN 


7C08B DRV1EN 


C08C Q6L 




C08D Q6H 


COSE Q7L 


C08F Q7H 


FOOO REGRWTS 




F031 DRIVSEL 


F03D DRVWAIT 


F044 OK 


F04E MOTOF 




F050 CONWAIT 


7F060 NODRIVERR 


F065 TRYTRK 


F07B TRYTRK2 




F07F TRYADR 


F086 TRYADR2 


F08B N0INTR1 


7F0A0 GOCAL 1 




•'FOA1 GOCAL 


F0A7 RDRIGHT 


FODB RTTRK 


7F0BF CORRECTVOL 




F0C7 CORRECTSECT FOEO ALLDONE 


FOES DRVERR 


F0E8 HNDLERR 




F0E9 ALDONE 1 
7F106 5EEK1 


F0F3 N0INTR2 
7F116 GOSEEK 


F0F9 WRIT 
F119 ALLOFF 


F105 MYSEEK 
F11B NXOFF 




F125 SETTRK 


F12B CHKDRV 


F12D CHKDRV1 


F13D CKDRTS 
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55 






56 








F13E DRVINDX 


F148 


READ16 


F14A 


RSYNC 


F14D RD1 




F152 RSYNC1 


F157 


RD2 


F162 


RD3 


F16E 


RD4 




F17D RD5 


F17E 


RD5A 


F192 


RD6 


F19D RDCKSUM 




F1A5 RD7 


F1AF 


RD8 


F1D8 


RDERR 


F1BA GOSERV 




F1BD RDADR16 


F1C1 


RDASYN 


F1C8 


RDA1 


F1CD RDASN1 




F1D2 RDA2 


F10D 


RDA3 


F1E8 


RDAFLD 


F1EA RDA4 




F1F2 RDA5 


F204 


RDA6 


F20E 


RDA7 


F217 RDEXIT 




F218 WEXIT 


F219 


WRITE16 


7F223 


WRT1 


F230 WSYNC 




F"24E WINTRPT 


F256 


VRYFRST 


F258 


WRTFRST 


F267 WNTRPT1 




F26A WMIDLE 


F271 


WDATA2 


F281 


WDATA3 


F293 WRCKSUM 




F2AC NOWRITE 


F2B3 


SERVICE 


F2DC 


WNIDL9 


F2BD WNIBL7 




7F2J3F WNII3L 


F2C6 


PRENID1& F2CA 


PRENIB1 


F2E4 PRENIB3 




?F2f;/ PR EN 1 132 


F2FS 


PRENIB4 


F300 


DNIDL 


F311 


P0STNIB16 




F315 PNI13L1 


F322 


PNIBL2 


F336 


P0ST1 


F338 P0ST2 




F34C POSTERR 


F34C 


SET 1 MEG 


F354 


SEV 


F353 NIBL 




F400 SEEK 


F40A 


SEEK2 


F41B 


OUT 


F41F MINTST 




F423 MAXTST 


?F429 


STEP 


F42D 


STEP2 


F444 SEEKEND 




F443 5ETPHASE 


F44A 


CLRPHASE 7F455 


SEEKRTS 


F456 MSWAIT 




F453 MSW1 


F461 


MSW2 


F467 


ONTABLE 


F470 OFFTABLE 




>F4/9 DLOCKIO 


F47E 


TRKSEC 


F49D 


QUIT 


F4A0 SECTABL 




7F4A8 ANALOG 


F4AB 


AN1.061 


F4C4 


GOODTIME 


FFD8 TIMER1L 




FFD9 TINLATCH 


FFD9 


T.IMER1P 


FFDF 


ENVIRON 


FFEF INTERUPT 




O'jOO 


J 9 ■»-*•* -a *** ->•>< ***•**•♦■*'*■+ < J * ******* 








OOOO 


3 *■ 














000 j 


4 *5a:-a 


diagnos 


r\C TES'! '"-GGTiNcS 








0000 


:•" < 2 V 

S *W. IiROEi' : u-!!i'' !- 


ft. LASHLr.'- 










oooo- 


■? -v 














0000. 


10 *CG'"" V 'F\ I OH": 1 ■ 


79 L-.Y APP E 










0000 : 


. 1 -■ 














0000: 


2 ?' -.< -j -;-;;■ *****-*■** •* 


■^•3 a ■? ■* * -<t & -a *****-> -.: 








000 1 : 


'. j SO" 




* 1 Fu 


^ RAK Vi"-' .- ;l:,n. 




;>.:..: ELY ROM 




0000: 


14 '.'.%?■■• 


EGO 


so 










00 1 : 


iv it»?Gi 


EGU 


SiO 










0016. 


I- ?-" r k'„-:; 


EGO 


^p'-Gi+e 










0019. 


, ' r v ;';.-<.. 


EGU 


vfi,.PGl>9 










00 1 A . 


•, J -N' 


£Gi : 


.-:r-'PGi+*A 










0087 


i* IB CMC 


KO>U 


$37 










0035: 


20 I3HUF 


3 EGU 


St; 5 










0091 


2: prevt 


W EQ'J 


£91 










FA""?- 


22 ELO-. ?- 


10 CiCU 


*F479 










/',: .-;,_;, 


2C-: C- V 


EGU 


*5D 










00 r r 


^-; £ ■ >'■ < 


t VU 


*FF 










1419. 


2S IBNA 


EGU 


S1400+PTRHI 










1810: 


26 PHP 


EGU 


S1S00+ZRFG1 










COOO: 


27 kypd 


EGU 


SCOOO 










COOS 


26 J\Evi3i:- 


EGU 


SC003 










COlO 


29 nB^rif 


RE EGU 


SCO 10 










C03G 


30 PDuEN 


EGU 


•*C053 










C047 


31 ADR 3 


EGU 


*C047 










CO 50 


32 GRrtD 


EGU 


*C050 










C '3 1 


33 TX'fMD 


EGU 


♦ C051 










C06z, 


34 AD TO 


EGU 


*C066 










^■■-...■j-j 


35 DISr<:: 


FF EGU 


*CODO 










C Or 1 ' 


36 AC I a? 


T EGU 


♦C0F1 










C0r2: 


37 AC I AC 


M EGU 


*C0F2 










C0F3: 


33 AC1AC 


N EGU 


♦C0F3 










C 1 00 . 


39 SLT1 


EGU 


SCI 00 










C200: 


40 SLT2 


EGU 


*C200 










C300 


41 3LT3 


LLC- J 


SC300 










C400 


42 SLT4 


EG'.- 


*C400 










CR-'F: 


43 EXPROM EGU 


SCFFF 










Ff-DO: 


44 ZPREG 


EGU 


♦FFDO 










FFDF: 


45 3YSD1 


EGU 


♦FFDF 
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57 






58 




FFD2: 






46 


3YSD2 


':. \a 1 -j 


SFFD2 






FFD3. 






••>-r 


SYSD3 


EuU 


SFFD3 






FFEO: 






48 


5YSE0 


EQU 


*FFFO . 






FFEF. 






49 


DNKSW 


EOU 


*FFEF 






FFE2 






50 


SYSE2 


EOU 


*FFE2 






FFE3: 






51 


SY5E3 


EQU 


*FFE3 






FC25: 






52 


COOT 


EOU 


*FC25 






FD07 : 






53 


CftQUTl 


EOU 


*FD07 






FDGF: 






54 


KEYIN 


EOU 


SFDOF 






F3C7: 






55 


SETCVH 


EOU 


*FBC7 






FD98: 






56 


CLDSTRT 


EQU 


*FD98 






FD9D: 






57 


SETUP 


EQU 


*FD9D 






F<?01 






58 


MONITOR 


EQU 


»F901 






OOOO 






59 


# 










NEXT 


OBJECT FILE NAME IS 


DIAG. 00 J 






F4C5: 






60 




ORG 


«F4C5 






F4C5: 00 


131 


B2 


61 


RAMTBL 


DFB 


SO. *B1. «B2 


, SBA, »B9, *10, «0. »13 




F4C8: DA 


B9 


10 














F4CB: 00 


13 
















F4CD: 






62 


CHPG 


EQU 


* 






F4CD: 52 


41 


CD 


63 




DC I 


'RAM' 






F4D0; 52 


4F 


CD 


64 




DC I 


'ROM ' 






F4D3: 56 


49 


CI 


65 




DC I 


■'•,'IA' 






F4D6: 41 


43 


49 


66 




DC I 


'AC I A ' 






F4D9: CI 


















F4DA: 41 


2F 


C4 


67 




DC I 


'A/D' 






F4DD: 44 


49 


41 


68 




DC1 


'DIAGNOSTIC 




F4E0: 47 


4E 


4F 














F4E3: 53 


54 


49 














F4E6: C3 


















F4E7: 5A 


DO 




69 




DC I 


' Zr 






F4E9; 52 


45 


54 


70 




DC! 


'RETRY' 






F4EC : 52 


D9 
















F4EE: 






71 


* 










F4EE: 






72 


* SETUP 


SYSTEM 






F4EE: 






73 


* 










F4EE: 






74 


* 










F4EE: A9 


53 




75 




LDA 


#*52+R0M 


TURN OFF SCREEN, SET 2MHZ SPEED 




F4F0: 8D 


DF 


FF 


76 




STA 


SYSD1 


AND RUN OFF ROM 




F4F3: A2 


00 




77 




LDX 


#♦00 


SET BANK SWITCH TO ZERO 




F4F5: 8E 


EO 


FF 


78 




STX 


SYSEO 






F4F8: 8E 


EF 


FF 


79 




STX 


BNKSU 






F4FB: 8E 


DO 


FF 


SO 




STX 


ZPREG 


AND SET ZERO PAGE SAME 




F4FE: CA 






81 




DEX 








F4FF: 8E 


D2 


FF 


82 




STX 


SYSD2 


PROGRAM DDR 'S 




F502: 8E 


D3 


FF 


S3 




STX 


SYSD3 






F50S: 9A 






S4 




TXS 








F506: E8 






SS 




I NX 








F507: A9 


OF 




86 




LDA 


#*0F 






F509: SD 


E3 


FF 


87 




STA 


SYSE3 






F50C: A9 


3F 




88 




LDA 


#*3F 






F30E: 8D 


E2 


FF 


89 




STA 


SYSE2 






FSU: AO 


06 




90 




LDY 


#*06 






F513: D9 


DO 


CO 


91 


PI SKI 


LDA 


DISKOFF, Y 






F516: 88 






92 




DEY 








F517: 88 






93 




DEY 








F518: 10 


F9 




94 




BPL 


DI5K1 






F51A: AD 


08 


CO 


95 




LDA 


KEYBD 






F51D: 29 


04 




96 




AND 


#$04 






F51F: DO 


03 




97 




BNE 


NXBYT 






F521: 4C 


89 


F6 


98 




JMP 


RECON 






F524: 






99 


# 










F524: 






100 


* VERIFY ZERO PAGE 






F524: 






101 


* 
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59 








60 




F524 


. A9 


01 




102 


N 


K3YT 


LDA 


#*01 


ROTATE A 1 THROUGH 




F526 


: 95 


00 




103 


NXBIT 


3TA 


ZRPG, X 


EACH SIT IN THE FG 




F528 


D^ 


00 




I 0** 






WiP 


ZRPG, X 


TO COMPLETELY TEST 




F52A 


DO 


FE 




10? 


NOGOOD 


BNE 


NOGOOD 


THE PAGE. HANG IF NOGOCD 




F52C 


: OA 






106 






ASL 


A 


TRY NEXT BIT OF EYTE 




F52I) 


DO 


F7 




107 






BNE 


NXBIT 


UNTIL BYTE IS ZERO. 




F52F 


E8 






103 






I MX 




CONTINUE UNTIL PAGE 




f-"J>30 


DO 


F2 




109 






BNE 


NXBYT 


IS DONE. 




F532 








110 


« 












F532 


8A 






111 


CNTWR 


TXA 




PUSH A DIFFERENT 




F533 


48 






112 






PHA 




BYTE ONTO THE 




F534 


E8 






113 






INX 




STACK UNTIL ALL 




F535 


DO 


FB 




114 






BNE 


CNTWR 


STCK BYTES ARE FULL. 




F537 


CA 






115 






DEX 




THEN PULL THEM 




F538 


86 


18 




116 






STX 


PTRLO 


OFF AND COMPARE TO 




F53A 


68 






117 


PULBT 


PLA 




THE COUNTER GOING 




F53B 


C5 


18 




118 






CMP 


PTRLO 


BACKWARDS. HANG IF 




F53D 


DO 


EB 




119 






BNE 


NOGOOD 


THEY DON'T AGREE 




F53F 


C6 


18 




120 






DEC 


PTRLO 


GET NEXT COUNTER BYTE 




F541 


DO 


F7 




121 






BNE 


PULBT 


CONTINUE UNTIL STACK 




F543 


68 






122 






PLA 




IS DONE. TEST LAST BYTE 




F544 


DO 


E4 




123 






BNE 


NOGOOD 


AGAINST ZERO. 




F546 








124 


« 












F546 








125 


* 


SIZE 


THE MEMORY 






F546 








126 


# 












F546. 


A2 


08 




127 






LDX 


«*08 


ZERO THE BYTES USED TO DISPLAY 




F348: 


95 


10 




128 


NOMEM 


STA 


ZRPG1. X 


THE BAD RAM LOCATIONS 




F54A: 


CA 






129 






DEX 




EACH BYTE= A CAS LINE 




F54D: 


10 


FB 




130 






BPL 


NOMEM 


ON THE SARA BOARD. 




F54D: 








131 


» 












F54D: 


A2 


02 




132 






LDX 


*S02 


STARTING AT PAGE 2 




F54F: 


86 


19 




133 


NMEM1 


STX 


PTRHI 


TEST THE LAST BYTE 




F551: 


A9 


00 




134 






LDA 


#*00 


IN EACH MEM PAGE TO 




F553: 


AO 


FF 




135 






LDY 


#«FF 


SEE IF THE CHIPS ARE 




F555: 


91 


18 




136 






STA 


(PTRLO), Y 


THERE. (AVOID h STK PAGES) 




F557: 


Dl 


18 




137 






CMP 


(PTRLO), Y 


CAN THE BYTE BE O'D? 




F559: 


FO 


07 




138 






BEQ 


NMEM2 






F55B: 


20 


48 


F7 


139 






JSR 


RAM 


NO, FIND WHICH CAS IT IS. 




F55E: 


94 


10 




140 






STY 


ZRPG1, X 


SET CORRES. BYTE TO FF 




F560: 


A6 


19 




141 






LDX 


PTRHI 


RESTORE X REGISTER 




F562: 


E8 






142 


NMEM2 


INX 




AND INCREMENT TO NEXT 




F563: 


EO 


CO 




143 






CPX 


#*C0 


PAGE UNTIL I/O IS REACHED. 




F565: 


DO 


E8 




144 






BNE 


NMEM1 






F567: 


A2 


20 




145 






LDX 


#«20 


THEN RESET TO PAGE 20 




F569: 


EE 


EF 


FF 


146 






INC 


BNKSW 


AND GOTO NEXT BANK TO 




F56C: 


AD 


EF 


FF 


147 






LDA 


BNKSW 


CONTINUE (MASK INPUTS 




F56F: 


29 


OF 




148 






AND 


#*0F 


FROM BANKSWITCH TO SEE 




F571- 


C9 


03 




149 






CMP 


#*03 


WHAT SWITCH IS SET TO) 




F573: 


DO 


DA 




150 






BNE 


NMEM1 


CONTINUE UNTIL BANK '3' 




F575: 








151 


* 












F575: 








152 


« 


SETUP 


SCREEN 






F573: 


20 


90 


FD 


153 


ERR LP 


JSR 


SETUP 


CALL SCRN SETUP ROUTINE 




F578: 


A2 


00 




154 






LDX 


#»00 


SETUP I/O AGAIN 




F57A: 


8E 


EO 


FF 


155 






STX 


SYSEO 


FOR VIA TEST 




F57D: 


CA 






156 






DEX 




PROGRAM DATA DIR 




F57E: 


8E 


D2 


FF 


157 






STX 


SYSD2 


REGISTERS 




F581: 


8E 


D3 


FF 


158 






STX 


SYSD3 






F584: 


A9 


3F 




159 






LDA 


#*3F 






F586: 


8D 


E2 


FF 


160 






STA 


SYSE2 






F589: 


A9 


OF 




161 






LDA 


#*0F 






F58B: 


8D 


E3 


FF 


162 






STA 


SYSE3 






F58E: 


A2 


10 




163 






LDX 


#*10 


HEADING OF 'DIAGNSTICS' WITH 




F590: 


20 


38 


F7 


164 






JSR 


STRUT 


THIS SUBROUTINE 




F593: 


A2 


00 




165 


ERRLP1 


LDX 


#*00 


PRINT 'RAM' 




F595: 


86 


5D 




166 






STX 


CV 


SET CURSOR TO 2ND LItJEr 




F597: 


A9 


04 




167 






LDA 


#*04 


SPACE CURSOR OUT 3 
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61 






62 




F9»» 20 C7 FB 


168 


JSR 


SETCVH 


(X STILL-0 ON RETURN) 




FWC 30 M F7 


169 


JSR 


STRUT 


THE SAME SUBROUTINE 




F31>F A2 6? 


170 


LDX 


#»07 


FOR BYTES 7 - IN 




F5A1' 


171 RAMWT1 


EQU 


* 






F3A1.B5 10 


172 


LDA 


ZRPG1, X 


OUT EACH BIT AS A 




F5A3: AO 08 


173 


LDY 


*S08 


' 'OR '1' FOR' INDICATE BAD OR MISSING 




F3A3 OA 


174 RAMWT2 


ASL 


A 


CHIPS SUBROUTINE 'RAM' RAM 




F5A6 48 


175 


PHA 




SETS UP THESE BYTES 




F5A7 A9 AE 


176 


LDA 


#*AE 


LOAD A ' ' TO ACC 




F5A9 90 02 


177 


BCC 


RAMWT4 






F5AB A9 31 


178 


LDA 


**31 


LOAD A '1 ' TO ACC 




F5AD 20 25 FC 


179 RAMWT4 


JSR 


COUT 


AND PRINT IT 




F5B0 68 


180 


PLA 




RESTORE BYTE 




F5B1 88 


181 


DEY 




AND ROTATE ALL 8 




F3B2 DO Fl 


132 


BNE 


RAMWT2 


t:-:es 




F5B4 20 07 FD 


183 


JSR 


CR0UT1 


CLEAR TO END GF LINE 




F-5S7 CA 


184 


DE* 








F5B8 10 E7 


185 


BPt. 


RAMWT1 






F5BA: 


186 * 










F5BA 


187 ♦ ZPGS- 


3TK TEST 






F!>BA 


188 -> 










F!iEA 9A 


189 


TXS 








F-^BB 8C EF FF 


190 


STY 


BWSU 






F5BE 98 


191 ZP1 


TYA 








F-SBF 8D DO FF 


192 


STA 


ZPREG 






F5C2 85 FF 


193 


STA 


STKO 






F?C4 C8 


194 


INY 








r ^-S 98 


195 


TYA 








F!">. 48 


i ^ ..-• 


PHA 








F5C7 68 


197 


PLA 








F5C0 C8 


198 


INY 








F5C9 CO 20 


199 


CPY 


#*20 






f5>:b oo fi 


200 


BNE 


7P \ 






i 'J CI; AO 00 


i J I 


LDY 


**SijO 






F^'-'F PC DO Fr-' 


'. '"' 2 


'i'l v 


l A R E G 






F5D2 e6 18 


OQ"J 


STX 


PTRL 






F5D4 EB 


204 ZP2 


I NX 








F5D5 86 19 


20? 


STX 


PTRHI 






F507 8A 


2'-'e 


TXA 








Fr.-FH Dt 18 


='. 'J ' 


CMP 


Drt,'i_ .'■, , , , 






F"ifA DO 06 


2 ij 


DNK 


ZP3 






F5DC EO IF 


209 


CPX 


#*1F 






F5DE DO F4 


210 


BNE 


ZP2 






F-5E0 FO 03 


211 


BEQ 


ROMTST 






F3E2 


212 ZPT 


EQU 


* 


CHIP IS THERE, BAD ZERO AND Si AC* 




F'"t:2 A2 1A 


213 


LDX 


#*1A 


SO PRINT 'ZP' MESSAGE 




r-rt4 r.o 7B f"' 


214 


JSP 


MESSERR 


?. SET FLAG (2MHZ MODE) 




F5E7 


215 * 










F5E7 


216 * rof" 


TEST 


ROUTINE 






F3E7 


217 * 










F5E V A 9 00 


218 ROM"'-: r 


LDA 


**00 


SET POINTERS TO 




F5E* A 8 


219 


TAv 




*F000 




F5t:A A 2 FO 


220 


'.PX 


# i'r C 






F5EC 85 18 


221 


STA 


PTRLO 






F5EE: 86 19 


222 


STX 


PTRHI 


SET X TO *FF 




F5F0 A2 FF 


223 


LDX 


#»FF 


FOR WINDOWING I/O 




F5F2 ': ! 18 


224 ROMTI 


1 FOR 


(PTRLO) • 


< COMPUTE CHKSUM ON 




P"*F4 K4 19 


225 


CPX 


PTRHt 


EACH ROM BYTE, 




F5F6 DO 0* 


226 




BNE R0MT8T2 WINDOW OUT 




F9F8C0 IF 


227 




cpy f»BF RANOES FFCO-FFEF _ _ 




FSFA: DO 02 


228 




BNE R0MTST2 




F5FC: AO EF 


229 




LDY #*EF 




F5FE: C8 


230 R0MTST2_ 


INY 


__ __ - — — 




F5FF: DO Fl 


231 




BNE ROMTST 1 




F601E6 19 


232 




INC PTRHI 




F603: DO ED 


233 




BNE RQMTST1._ .. ._ 




F605: A8 


234 




TAY 


TEST ACC. FOR 




F606: FO 05 


235 




BEQ VIATST YES, NEXT TEST 




F608: A2 03 
F60A: 20 7B F7 


236 
237 




LDX #*C 


)3 PRINT 'ROM' AND 

5SERR SET ERROR 




JSR MES 




F60D: 


238 * 
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63 








64 




F60D 
F60D 






239 # 

240 * 


VIA 


TEST ROUTINE 


_„ _ 








F60D: 18 




241 VIATST CLC 




SET UP FOR ADDING DYTES 




F60E: D8 




242 




CLD 








F60F: AD EO 


FF 


243 




LDA 


SYSEO 


MASK OFF INPUT BITS 




F612: 29 3F 




244 




AND 


#*3F 


AND STORE BYTE IN 




F614: 85 18 




245 




STA 


PTRLO 


TEMP OR. LOCATION 




F616 AD EF 


>F 


246 




LDA 


3NKSW 


MASK OFF INPUT BITS 




F619. 29 4F 




247 




AND 


#*4F 


AND ADD TO STORED 




F61B 65 18 




248 




ADC 


PTRLO 


BYTE IN TEMP. LOC. 




F61D 6D DO 


FF 


249 




ADC 


ZPREG 


ADD REMAINING 




F620 85 18 




250 




STA 


PTRLO 


REGISTERS OF THE 




F622 AD DF 


FF 


251 




LDA 


SYSD1 


VIA'S 




F625 29 5F 




252 




AND 


#*5F 


(MASK THIS ONE) 




F627 65 18 




253 




ADC 


PTRLO 


AND TEST 




F629 6D D2 


Fr 


254 




ADC 


SYSD2 


TO SEE 




F62C 6D D3 


FF 


255 




ADC 


SYSD3 


IF THEY AGREE 




F62F. 6D E2 


FF 


256 




ADC 


SYSE2 


WITH THE RESET 




F632 6D E3 


FF 


257 




ADC 


SYSE3 


CONDITION 




F-b'f'r C9 El 




25B 




CMP 


#*EO+ROM 


=E 1 "> 




f-'6I! ' r -"C> 05 




259 




BEQ 


AC I A 


YES, NEXT TEST 




f->3 ,; - A 2 06 




260 




LUX 


#*06 


NO, PRINT 'VIA' MESS 




F63I-; 20 7B 


F7 


261 




JSR 


MESSERR 


AND SET ERROR FLAG 




F63E- 




262 * 












^c-m 




263 * 


ACTA TEST 


ROUTINE 






ff-j3i: 




264 * 












r-,:nL 18 




265 ACTA 


Cl.r 




SETUP FOR ADDITION 




F63F A<? <9f" 




266 




LDA 


#*9F 


MASK INPUT BITS 




F641; 2D Fl 


CO 


267 




AND 


AC I AST 


FROM STATUS REG 




F644: 6D F2 


CO 


268 




ADC 


ACIACM 


AND ADD DEFAULT STATES 




F647; 6D F3 


CO 


269 




ADC 


ACIACN 


OF CONTROL AND COMMND 




F64A. C9 10 




270 




CMP 


#*10 


REGS. =10'' 




F64C FO 05 




271 




BEG 


ATD 


YES, NEXT TEST 




F64E A2 09 




272 




LDX 


tt*09 


NO, -AOIA' MESSAGE AND 




F650 


20 7B 


F7 


273 




JSR 


MESSERR 


THEN SET ERROR FLAG 




F653 






274 * 












F653 






275 * 


A/D 


TEST ROUTINE 






F653- 




276 * 












K'.'i3 A9 CO 




277 ATD 


LDA 


#*C0 






r^'yy so DC 


FF 


278 




STA 


*FFDC 






F658. AD 5A 


CO 


279 




LDA 


PDLEN+2 






F6'.iI3: AD 5E 


CO 


280 




LDA 


PDLEN+6 






F6 U "E. AD 5C 


CO 


281 




LDA 


PDLEN+4 






F66l AO 20 




282 




LDY 


#»20 






F663: 88 




283 ADCfSTl DEY 




WAIT FOR 40 USEC 




F664 DO FD 




284 




BNE ADCTSTl 






F666 AO 3D CO 




285. . 




LDA PDLEN+3 SET A/D RAMP 




F669 C8 




2B6 ADCT5T3 


INV 


COUNT 


FOR CONVERSION 




F66A ro OA 




as/ 




13E>* ADC 


ERR >:2'j5- 


ERROR) 




F66C AD 66 CO 




ass 




LDA ADTO IF BIT 


7=1" 




F66F' 30 F8 




289 




BMI ADCrST3 YES- CONTINUE 




F671 98 




290 




TYA 


NO, MOVE COUNT TO ACC 




F672: 29 EO 




291 




AND #*E0 AC CO 


2? 




F674 FO 05 




292 




BEG KEYPLUG 






F67t. 




293 ADfFFR 


ECiU •» 


NO, 






Ff-.'.'fr- A2 OD 




294 




u>< #*o 


D PRINT 


'A/D' MESS 




F6 78 20 7B F7 




295 




J5R MESSERR AND SET ERROR FLAG 




F67B 




296 * 












F67B 




297 «• KEYBOAD PLUG IN 


TEST 






F^ B 




29S * 












F6/B AD 08 CO 




299 KE'i 


PLUG 


IDA KE/BD IS KY3D PLUGGED IN'"> 




F67E. OA 




300 




ASL A 


(IS LI 


3HT CURRENT 
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65 




66 






F67F 10 41 


301 


BPl. 


SEX PRESENT?) NO. BRANCH 






F681 AD DF FF 


302 


LDA 


SYSD1 IS ERROR FLAG SET' 






F684 10 03 


303 


BPL 


RECON (2MHZ MODE) NO, BRANCH 






F6B6 4C 93 FZ 


•304 


JMF 


EPRLP1 ERROR. HANG 






F689 


305 * 










f-689: 


306 * Kf.-CONFIC-t.'kfc SYSTEM 






F689: 


307 * 










F689 


308 RECON 


EQU 


# 






F689. A9 77 


309 


LDA 


#»77 TURN ON SCREEN 






F68B 8D DF FF 


J 10 


STA 


5YSD1 






F68E 20 9fi FT- 


311 


..I«3R 


CI.DSTRT INITIALISE MONITOR AND DEFAULT CHARACTER 




f : 6«l A9 10 


312 


LDA 


**10 TEST FOR "APPLE 1" 


SET 




F693: 2D 09 CO 


313 


AND 


KEYBD 






F696 DO 09 


314 


BNE 


BOOT NO, DO REGULAR BOOT 






F698: 2C 10 CO 


315 


BIT 


KBDSTRB CLEAR KEYBOARD 






F69U AD 50 CO 


316 


L DA 


GPMD 






F-6«E 20 01 F = 


31" 


JSR 


MONITOR AND NEVER COPE- BACK. 






F6AI A2 01 


318 nOOT 


I DX 


#1 READ BLOCK 






F6A3 86 87 


319 


STX 


IBCMD 






F6AS CA 


320 


DEX 








F6A6 86 83 


321 


STX 


IBBUFP INTO RAM AT «A000 






f-6A0 A 1 * AO 


?r? 


LDA 


t»*A0 






KvAA 8? 86 


:3 V rj 


STA 


H3BUFP + 1 






K.-..AC -lA 


324 


l i ;r 


A , FOR TRACK 80 






F6AD 85 91 


325 


STA 


PREVTRK MAKE IT RECALIBRATE TOO 1 






F6AF BA 


326 


TXA 








F6B0 20 79 F4 


327 


JSR 


BLOCKIO 






F6B3 90 OA 


3'iJ 


BCC 


•,r)lj00T IF Ut'VE SUCCEEDED. DO IT UP 






FoPfi A t -.' 1C 


329 


LD> 


»«K 






f 6i-;7 ;:o 38 f; 


330 


JS" 


STRUT -RETRi"- 






F6DA 20 OF FD 


331 


JSR 


KEY IN 






F6BD BO E2 


332 


BCS 


BOOT 






F6BK 4C 00 AO 


333 QOBOOT 

3 3t> « SYST 


JMP 


*A000 • GO TO IT FOOL. . 






f >.''. t -i 


FM (-.U-RCI^ER 






FK. 2 


3 36 * 










F6C2 AO 7F 


337 SEX 


LDY 


#*7F TRYFPOM 






Fr>C4 98 


338 SEX1 


TYA 


7F TO 






F6C5. 29 FE 


339 


AND 


*»FE ADD. - 






F6C7 49 4E 


340 


EOF 


#»4E 4E0R4F? 
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179 * 
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F9B9: C9 BA 


189 


CMP #*BA 


; IS IT >'9' 


F9BB90 02 


190 


BCC PRHEX2 






F9BD: 69 06 


191 


ADC «*6 


iMAKE IT 'A'-'F' 




F9BF: 
F9C2: 


4C 25 FC 


192 PRHEX2 


JMP COUT 






193 # 








F9C2: 20 AC F9 


194 PRBYCOL 


JSR PRBYTE 






F9C5: 

F9C5: 




195 * 






A9 BA 


196 PRCOLON 


LDA #»BA 


; PRIMT A C.OLON 




F9C7: DO F6 


197 


BNE PRHEX2 


i BRANCH ALWAYS 




F9C9: 
F9C9: A9 07 


198 * 

199 TST80WI 








D LDA #7 


(ANTICIPATE 






F9CB: 24 68 


200 


BIT MODES 


; TEST FOR BO 




F9CD: 50 02 
F9CF: A9 OF 


201 


BVC SVMASK 

LDA #*F 


....._ - - - - 


202 




F9D1: 85 69 


203 SVMASK 


STA MASK 






F9D3: 60 


204 


RTS 






F9D4: 


205 * 








F9D4: SA 


206 A IPC 


TXA 


; TEST FOR NEW PC 




F9D5: FO 07 


207 


BEQ OLDPC 






F9I>7: B5 74 


2oe A1PC1 


LDA AIL, X 






F9D<5 95 72 


209 


STA PCL, X 






F9DB: CA 


210 


DEX 






F9DC: 10 F9 


211 


BPL AlPCl 






F9DE: 60 


212 OLDPC 


RTS 






F9DF: 


213 * 








F9DF 85 69 


214 ASCII 1 


STA MASK 


i SAVE HI BIT STATUS 




F9E1 A4 7D 


215 ASCII2 


LDY YSAV 


;MOVE ASCII TO MEMORY 




F9E3:B1 7E 


216 


LDA (INBUF),Y 






F9E5: E6 7D 


217 


INC YSAV 


i BUMP FOR NEXT THINO. 




F9E7: AO 00 


218 


LDY #0 






F9E9C9 A2 


219 


CMP «*A2 


i ASCI I " ? 




F9ED : DO 05 


220 


BNE ASCI 13 


i NOPE, CONTINUE. 




F9ED. A5 69 


221 


LDA MASK 






F9EF. 10 20 


222 


BPL BITON 


iHE'S CHANCED MODES. 




F9F1: 60 


223 


RTS 


* NO, HE'S DONE. 




F9F2C9 A7 


224 ASCI 13 


CMP #«A7 


i ASCII ' ? 




F9F4: DO 05 


225 


BNE CRCHK 


;N0» TEST FOR EOL. 




F9F6 A5 69 


226 


LDA MASK 






F9F8 


30 IB 


227 


BMI B I TOFF 


; CHANGE MODES. 




F9FA 


60 


228 


RTS 






F9FB 


C9 8D 


229 CRCHK 


CMP tt«8D 


j END OF LINE? 




F9FD 


FO 07 


230 


BEQ ASCDONE 


i YES. FINISHED 




F9FF 
FAOi 


29 *9 

20 AF FA 


231 

232 


AND NMK 






JSR STOR 1 


;C0 STORE IT! 






FA04 


DO DB 


233 


BNE ASCI 12 


; DO NEXT. 


k 
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FA06 *0 






234 


A8CD0NE 


RTS 








FA07: 

FA07 38 






233. 

236 


• 

Asci r"" " 


"sec" 


— -- 


, INDICATE HI ON. 




FA08 90 






237 




DFB 


*90 


. (BCC - NEVER TAKEN) 




FA09 18 






238 


ASCI 10 


CLC 




, ITJDICATE HI OFF 




FAOA AA 






239 


CKMDE 


TAX 




, SAVE STATE 




FAOB: 86 


7C 




240 




STX 


STATE ■ 


RETAIN STATE 




FAOD: 49 


BA 




241 




EOR 


#»BA 


i ARE WE IN STORE MODE"' 




f'AOF. DO 


7D 




242 




ONE 


ERROR 






FAll A9 


FF 




24:9 


DITON 


LDA 


#«FF 


, SET HI BIT UNMASKED 




FA 13 DO 


CA 




244 




BCS 


ASC I I 1 






FA15 A9 


7F 




245 


D I TOFF 


LDA 


#»7F 


MASK HI BIT 




FA 17: 10 


C6 




246 




BPL 


ASC III i 


ALWAYS 




FA I 9 2C 


00 


CO 


247 


REPEAT 


BIT 


KBD 


. REPEAT UNTIL KEYPRESS 




f- A 1 1 


03 




248 




BPL 


REPEAT 1 






FA1K 40 


OF 


FC 


249 




JMP 


KEVIN 






FA21 ufl 






250 


REPEAT! 


PL A 




CLEAN UP STACK 




FA22 68 






251 




PLA 








FA23 4C 


12 


F9 


25k 1 




JMP 


SCAN 






FA26 






253 


* 










f " A26 






254 


♦ 










f-a;.'o io 


AO 


FA 


255 


CRMON 


JSR 


BLI 






fA2^ 4C 


08 


f 9 


256 




..IMF 


mun; 






FA2C 






257 


■» 










FA2C 20 


9B 


F9 


258 


MOVE 


JSR 


TSTAl 


DON'T MOVE ANYTHING IF ILLEGAL INPUT 




F-A2F BO 


5D 




259 




DCS 


ERROR 






r <-•'.'. i v- i 


T 4 




260 


MOVN*T 


L DA 


(ail'', y 


MOVE A BYTE 




F"AJ_j ^1 


'A 




26 I 




ST A 


( A4L ) . V 






f 'i\'-<":> 20 


BC 


F 1 -" 






JSP 


N*TA4 


DUMP BOTH Al AND A 4 




f-a;>h 90 


F7 




263 




RCC 


MOON XT 






F-A3A 60 






26 4 




RTS 




ALL DONE WITH MOVE 




FA 3D 






265 


* 










- a:;e 






.::£>•-! 


a 










■vf 20 


" J B 


F9 


26 7 


VPF'Y 


i^fy 


Tf-. IA1 


TE:iT VALID RANGE 




'"-•■ if. g>: 


•it". 




2 -r d 




OCC 


ERROR 






K"A4 PI 


'4 




2 69 


VRFY1 


LDA 


(AIL). V 


COMPARE BYTE FOR BYTE 




r.\4? di 


7A 




270 




CMP 


< A4L > . Y 


MATCH7 




FA4 4 FO 


06 




271 




BEQ 


VRFY2 


YES. DO NEXT 




F VI:- c'O 


5 c 1 


FA 


- ' 1 




JSR 


MISMATCH 


PRINT BOTH BYTES 




f-A4'. 20 


E'F 


FC 


2 7 1 




JSR 


CPUOT 


GOTO NEWLINE 




r - >\ ,■; r T'*. 


Pi"' 


F9 


2 '4 


VRFY2 


.'SR 


N*TA4 


3UMH BOTH Al AND A4 




KA4F 90 


EF 




27 5 




ucc 


VRFY1 






f'A51 60 






276 




RTS 




VERIFY DONE. 




FA52. 






27 -7 


* 










f-'A'v: a -5 


7B 




27 y 


MISMATCH IDA 


A4H 


PRINT ADDRESS OF A4 




! -V;..i 20 


AC 


Ff 


2/9 




JSR 


PRBYTE 






F A'; ' A 1 ? 


:'A 




280 




t.DA 


A4L 






FA59 20 


C2 


F9 


2G1 




JSR 


PRBYCOL 


OUTPUT A COLON FOR SEPARATOR 




f : A5C: Dl 


7A 




282 




LDA 


< A41. > , Y 


AND THE DATA. 




FA5E 20 


70 


FA 


283 




JSR 


PRBYTSP 


PRINT THE BYTE AND A SPACE 




F- Ac. ! 2'.' 


7 3 


FA 


23 4 


PRINT A 1 


JSR 


PR5PC 


LFAO WITH A SF J ACE , 




f--,V.4 A'j 


75 




28') 




LDA 


A1H 


OUTPUT ADDRESS Al 




FA,'.. 6 .--'."■ 


A" 


F9 


2 So 




JSR 


PRBYTE 






FA69. A5 


74 




287 




LDA 


AIL 






FAfeH 20 


C2 


F9 


288 




JSR 


PRBYCOL 


SEPARATE WITH A COLEN 




FA6E !.' 1 


7 4 




289 


PRA1BYTE UDA 


(AIL), Y 


PRINT DVTE POINTED TO BY Al 




FA/0 20 


AC 


f-tv 


290 


PRBYTSP 


JSP 


PRBYTE 






FA "."3 A- 


A'' 




291 


PRSPC 


LDA 


#*A0 


PRINT A SPACE 




FA75 4C 


25 


FC 


292 




JMP 


COUT 


END VIA OUTPUT ROUTINE- 




FA7B 






293 


• 










I"A"'H 4i 
f A T 


F-8 


3 


2 '?4 


< if-ER 


JMF 


U'"jiEI<ADR 












2 n * 


JUMP 


PLA 








FA70 oB 






297 




PLA 




LEAVE STACK WITH NOTHIN' ON I !' 




FA7D 20 


04 


F9 


298 


GO 


JSP 


A IPC 


STUFF PROGRAM COUNTER 




FA80 6C 


72 


00 


299 




JMP 


(PCD 


JUMP TO USER PROG 




FAt3 






. 00 


* 










>-'A83 






.!■": 1 


WUERROR 


F.au 


» 


~P INT i HROR NUMBER 


k 
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89 






90 




FAS'? r?0 A'? F"' 


3 , -■ ■ 1 


JSR 


FR3VTE 


I-'"! I 1! THE UFFErJDER 




FAP6 A9 Al 


.303 


LDA 


#*A1 


, FOLLOWED BY A " ! " 




FAB8 20 25 FC 


304 


JSR 


cour 






FA8B 20 07 FD 


;i05 EPR0R2 


JSR 


NOSTOP 


.OUTPUT A CARRAOE RETURN • NL' '.-' VOPL BT '■ 




i a:-:f 4C 04 r 1 -' 


f|.-_ FRROi< 


..IMF 


no;j 






T-A'-'l A'.' '"^ 




I [J A 


A2L 


. : :0i J * A2 TO A4 FOP DF.S T ! r : AT 1 Ql ' L"' 




FA«3 95 "'A 


'30V 


STA 


A4L 






FA-75 A^ 77 


j ; o 


LDA 


A2H 






FAv7 35 7B 


31 I 


STA 


A4H 






f A '.'■'.' -.,■ 


■1 


r re-. 








r -YV,". 


, » 










■-W'A V;>j -.1 FA. 


'.- . ; 'i;t>' 


.JSB 


SPCF 


Sf.:- AFATOR TEST STORE .'-ICOl' UF 1'h.m-iP 




f-AM; Va 


"■; 1 '") 


TYA 




, 7 FRO MODE 




IA7F F0 ID 


31 * 


BEO 


SbTMDZ 


, BRANCH ALWAYS 




FAAO 


3 i ■ * 

' : - C! 1 


1)EC 


v '^A^'' 


. Ti-'ST FOR NO LINE 




V A V' r ■ ' '• ': 




DET 


PF'M^f? 


. IF MO LINE. GIVFN A ROW OF 3YTF.", 




FAA4 Cm 


'.'."'v TV 1 - I- 


U!-."' 




,TK';:-;T IF AFTER ANOTHER SPACE 




FAA5 DO 16 


■'.? I 


DNE 


5F.TMDZ 






FAA7 C DA 


3 3i <r'. 


C. MF 


ft-*!" A 


SfO^K MODE'' 




FAA9 DO '113 


''•■" : 


BNE 


T ■ ' '.'MF 






t-aah a:-. ~ : 




'-' T 


/. ■'■ : : 


HEFT IT I'.' STORE !i r Alf 




FAAD A5 '*•-• 




1 !'A 


A21. 


■'« '• D •'TE TO BE 3 TURF'" 




F'A^r •* \ 


";•'..■ '•" r, :••-•• i 


: j r,\ 


i A 31.. . : 


F' r IT IN KEMORV 




»-"^r> F.p '•-' 


'L-: ,? 


[no 


A A. 


, BONP POINTER 




FAii DC/ 02 


-jcia 


UNE 


DUNI1V 






FA 13 'I" EFw '"4 1 


tic 


Ir4i7 


A3H 








.;,; ;,,,.„„,. 


'• T -i 




Al '. ' IJ'Jt-T; FOR ' 1" 't.L'AF MOIJt 






J V ,- :t", ,DF. 


. ;,, 


, ;.,.-,',' 


, i..---: INPUT CHAPA-:. ' i F 




: '../a i/ 


J i 3 


DE '.' 








f"-\bn & '. >: 


• : :.i4 


1. DA 


< tNBL'F ' 


. TO SET MODE 




faiji. -;•; "o 


'3.3'; SE f^l. ^ 


STA 


STATE 






f-.vj"' 2.' 


:■■".'■■• 


RT'i 




' 




t- a 


'.■..'•:' >'-'.'. A! 1 


L.PA 


ttl 


i-, c :i Di'ii* cowiArn: ":■ ■'".•"".!.■ 




FAw. 2'? 


■j.3 1 ' 


DFB 


*3C 


■ DUMMY BIT TO SKIF 2 Ji^TES 




FAC.3 A=? 02 


.340 WRTE 


LDA 


#2 


SET DISK COMMAND TO WRITE 




FAC5 8*' 87 


341 SAVCMD 


STA 


IBCMD 






-AC .' ,V" '.i 


:vt;.> Rwi.j'jP 


I.DA 


AIL 






FA<" ' F'5 >JS 


34 3 


hi A 


iCDUFF 


. i-iviflAND FORMAT I.-: 




r .-.- A'- "'•■ 


::4 J 


LDA 


A1H 


, BLOCKNUMBEP >%: ' '- :■ .-■ . ''.r.P -.UDWES" 




f.,:.;. c.' r>, 


345 


STA 


IBBUFP+ : 






FACT ••'i '(.' 


346 


LDX 


A4H 


, SEND BLOC'/- NUMBER VIA X '« A 




FAD I A "3 7 A 


347 


LDA 


A4L 






fa i.'.- '■■:.■ 


'J 46 


SE1 




.NO 1NTEPUPTS WHILE IN MONITOR 




r- Al'« ' ' f ■' 


349 


JSP 


BLOCK 10 


, DO t/ISKG FEVER 




FAD7 BO AA 


350 


BCS 


RWERROR 


;GIVE OP IF ERROR ENCOUNTEPEn 




FAD9 E6 7A 


351 


INC 


A4U 


. BUMP BLOCK NVUBEF 




FAIH-i DO 02 


352 


BNE 


MOVER 






F ■.!.■; ' II.'- "'IS 


'35 "a 


IhC 


A4H 






■■■,:.'■•' [•...-. /b 


3'>4 UHU'F 


i r jo- 


A1H 


i, jriP o-i'" .-bl)trES:S V i '' ' . f r i i- : 




f- rtt. 1 t6 75 


355 


in c 


A1H 






t At-.H iO 9B F9 


356 


-JSR 


TSTA1 


, TEST FOR FINISHED 




( : Ac.6 *0 DF 


357 


DCC 


RWLOOP 


.NOT DONE- DO NEXT BLOCK 




'• Ai- .:-. -o 


3 5 P. 


•'-> T C-, 








r- af - 


35* ' 










FAt. 1 .' 


360 


'•HN 


MCNS'B 






fas: 9 


1 DUMPQ 


EQIJ 


• 


, OUTPUT 1 ROW OF BYTES 




FAE9 A3 75 




LDA 


A1H 






FAE13 35 77 


3 


yTA 


A2H 






iACr. ,:ii C" F"~ 


'\ 


jBF' 


r'jTOOWID 


, Vr'.T WIDTH MASK INTO AC! 




F-'AT-O OV' "'4 


I, 


0»A 


AU. 






FAF-I! B5 76 




STA 


a;:;l 






FAF4 DO 06 


7 


DN£ 


DUNPO 


; BRANCH ALWAYS 




FAFfj 


a *• 










FAF6: 4A 


9 TSTDUMF 


LSR 


A 


; DUMP"' 




f- Al ' PC) 9 5 


1 ERROR 1 


BCS 


ERROR 




k 
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f.-.f -:■ 


PO 


•? 


V '-"■ 


1 1 


DUMP 


JSP 


TST80WIH 


.SET FOR EITHER BO Of- 4Q ..'OLUM^S 




' AF- . 


A 'J 


'4 




i 2 


DUMP'. 


I ..DA 


AH 


, UH-r A4 FOR ASC I I D'JW 




FAFE 


85 


7 A 




i: 




STA 


A4L 






FHOG 


A5 


75 




ii 




LDA 


A1H 






FBO=? 


85 


7Q 




i = 




STA 


A4H 






i L,/>4 


BO 


EE 




i :"". 




■JSV. 


r-;r.'. i 

ERROR 1 


l"l;GT FOR VALID RAf4.:r_ 




i |. ■ , 


.-'.O 


c 1 


r .: 


. 


dump : 


JSP 


PRINTA1 


PWINT ADDRESS AND n l 'ii !'T£ 




FHCC 


tO 


92 


{.-■: 


1 ' 


DUMP, 


JSP 


NXTA1 






F'HOF 


BO 


10 




-:C 




Bcr-> 


DUMP ASC 


, C-rJD WITH ASCII 




F- H 1 ] 


A5 


7 4 




;:i 




L.PA 


All. 


. TEST END OF LINE 




f. ;.■ • ■ 


; ' '" 


s9 




p.. 




and 


riA^i*-. 


. r-UR 40/80 COLUMN 




. ; . : ; L 




"■ 




-? . 




BNE 


D<JMP 3 








=: .■ 


21 


t- r 


.■■ 




JSR 


DUMP ASC 






r- [-' ; a 


D 'J 


ED 




■• t 




BNt ; . 


DUMP 1 


, BRANCH ALWAYS 






<t?0 


6E 


FA 


.v. 


DUMP.'. 


JSR 


PRAiBYTF. 


■ GO PRINT NEXT BYTE AND A SPACE 




f J- 1 i r 


DO 


fc'B 




.-: ■ 




BNE 


DUMPS 


ALWAYS (ACC JUST PUl I ED AS *A0 > 




'■':■■:■■: 


,V' 


'Vi 




r ,r , 


rv.r-iK .-. 


■jC Li?' A 


A4L 


RESET TO BEGIN; NO iJK L. I NL" 




'• v :■::■'■ 


J1 


' 7 4 




* 




SIA 


A1I 






t'l:,:': 


A '5 


7 B 




3 i 




LDA 


A4H 






rn,: ' 


a"; 


■? cs. 




32 




GTA 


A1H 






r-H-y> 


c!0 


73 


r. .■ 


"iT: 




j"P 


PPT-;r'C 


PRINT AN EXTRA 9.PACE 




:- : : / 




? ^ 




,-t -j 


a 1 .-'; i 


l :." 


*»•'• 


10 INDEX ME MOP : !?;!Hvi-a 




; " '. : > 


. '.-- 


r-ir. 




7. 




ilHA 




::.F.-T NORMAL VIDEO 




1 ' . — ■ C 


\. ' J 


AC' 




M 




■: mp 


#*A0 


TEST FOR CONTROL OH&RACTERS 




■ :, >i 


i-K' 


02 




."!■> 




BC r i 


ASC l' 


Of TO PRINT NON CONTROLS 




i . rv J .'. 


A-' 


At' 




_J<W 




LDA 


«t*AE'. 


.OTHERWISE PRINT A 3P-v:F. 








*• e. 


F-. 


4 : 




. l " . r ' 


'. r .. iT 


. PUT IT nun 




' ' -' 


r _ , ■ 


'-' -". 


!- - 


i ' 




v. ••' •"■ 


fj> :'A4 


■ 3 ,: '-]i- BOTH Al AND A4 
r i WISHED 




". 




■■► 




4> 




LP A 


AIL 


, TEST END OF LINE 








■. J 




44 




AND 


MASI* 










• -> 




4" 




BNF 


ASCI 


MOT DONE, PRINT Nt-'XV 




. .►. 




i ■ 


F'. 


4c 


asc :■) 


J MP 


CRour 






/-i-. 








4- 


* 










FB49 








48 


* 










FB49 








49 


• 










FB49 


3B 






50 


C0L80~ 


SEC 




', INDICATE 80 COLUMNS DESIPED 




r;.'4A 


AD 


53 


'C 


51 




LDA 


*C053 


, GOTO 80 COLUMN MODE 




r u-'.r- 


b>:' 


04 




52 




DCS 


SET80 


; BRANCH ALWAYS 




FB4F 








53 


* 










FB4F 


18 






54 


C 01.40 


CLC 




i INDICATE 40 COLUMNS DESIRED 




FB50 


AD 


32 


CO 


3? 




LDA 


•C052 


i GOTO 40 COLUMN MODE 




f-'B?.-i 


A^ 


&.ei 




56 


SET BO 


LDA 


MODES 






f"PV5 


u ■ 


40 




57 




OR A 


#*40 


, AbS'JMK iv. 




'•PV 


Hv 


02 




58 




BCS 


SET80A 


ANL BRANCH IK IT IS 




FB^<? 


£9 


BF 




59 




AND 


#«BF 


/ BUT FIX FOR 40 IF" NCT 




FB',iI3 


85 


68 




60 


SET80A 


STA 


MODES 






FI35D 


09 


7F 




61 




OR A 


#*7F 


, ISOLATE BI I / 




FBV-F 


29 


AO 




62 




ANP 


»»«A0 


;<H:v : ' SFIS NORMAL/ INVERSE ' 




ru.<., 1 


85 


66 




«3 




STA 


FORGND 






KL'o'.J 


BO 


02 




64 




BCS 


SET80B 


AGAIN ASSUMES 80 COLUMNS 




f r Bt.5 


A9 


FO 




65 




LDA 


#»F0 


; IF NOT. SET FOR/BACKGROUND COLOR 




FB67 


85 


67 




66 


SET80B 


STA 


BKGND 






FBb9 








67 


* 










r r ,-, v 


A5 


58 




68 


CL5CRN 


LDA 


LMAPG1N 


.SET CURSOR TO TOP LEFT OF WINDOW 




f-Hrl' 


e.'.> 


5C 




e.9 




STA 


CH 






fBol 


A? 


5A 




~0 




LDA 


WINTOP 






FB6F 


85 


5D 




71 




STA 


CV 


; NOW DROP INTO CLEAR END OF PAGE 




FB 7 1 








72 


* 










FB71 


A5 


5C 




73 


CLEOP 


LDA 


CH 


, SAVE CURRENT CURSOR POSITION 




FB""j 


4ES 






74 




PHA 








FD'4 


A5 


5D 




75 




LDA 


CV 






F-B7±> 


43 






76 




PHA 








FB77 


20 


Bl 


FB 


77 




JSR 


SETCV 






FB 'A 


20 


8E 


FB 


78 


CLE0P1 


JSR 


CLEOL 


, CLEAR TO END OF FIRST LINE 




FB7D 


A5 


58 




79 




LDA 


LMARGIN 






FB'P 


85 


5C 




80 




STA 


CH 






FBril 


SO 


C9 


FB 


81 




JSR 


CUR DOWN 


, GOTO NEXT LINE 


k 
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FB84 


90 


F4 


82 




UCC 


CLEOPl 






FG86: 


68 




83 




PLA 








FB87: 


A8 




84 




TAY 








FB88 


68 




85 




PLA 




RESTORE CURSOR POSITION 




FflS9 


8 "3 


5C 


36 




STA 


CH 






FB8B 


98 




87 




TYA 




GET OLD CV IN ACC AvAlFJ 




F-prir 


BO 


23 


SB 




OCS 


SETCV 


BRANCH ALWAYS 




FB8E 






89 » 












FB8E 


A5 


5C 


90 CLEOL 


LDA 


CH 


CLEAR TO END OF LINE FIRST 




FD90 


4C 


89 FC 


91 




JMP 


CLEOL 1 






FD93 






92 * 












F- I-r'3 


C9 


BO 


93 CONTROL 


CMP 


#*80 






FH"? 


90 


65 


94 




ncc 


DISPLAYX 


IF INVERSE 




FB9 7 


C9 


8D 


95 TSTCR 


CMP 


*«8D 


IF CARRACE RETURN THEN NEW LINE 




FB99 


DO 


3A 


96 




BNE 


TSTBACK 






FB9B 


20 


8E FB 


97 CARNAGE 


JSR 


CLEOL 


FIRST CLEAR TO THE END OF THIS LINE 




F'Bfr 


'2' j 


C3 FB 


98 




jSR 


(if TO HZ 


RC3£T CURSOR AND GOTO NEXT LINE (CARRY 




FBA1 


4'" 


?2 FC 


99 

100 * 

101 * 




MP 


NXTl. IN 


THEN GOTO THE NEXT LINE IS SET) 




FBA4 
















Fi3A4 


A5 


3D 


102 CURUP 


I. DA 


CV 


TEST FOR TOP OF SCREEM 




FBA6 


C6 


5D 


103 




DEC 


CV 


ANTICIPATE 'NOT' TOP 




i-BAB 


C5 


■?A 


104 




CMP 


W1NT0P 






FRAA 


DO 


Oc.' 


105 




BNE 


CURUP 1 


IT'S NOT TOP. CONTINUE 




FBAC 


AS 


SB 


106 




LDA 


WINBTM 


i WRAP AROUND TO BOTTOM 




FBAE 


38 




107 


CURUP 1 


. ^c 




. DECREMENT BY ONE 




FDAF 


E9 


01 


ioa 




5B- 


#■£ 






FBD1 


8S 


?[' 


1 0'' 


«•*. I'" . 


ST' 




, -SAVE-: NEW VERTICAL LINE 




FIB 133 






: i :■ 


I;.*. ,.:. 


r- -.._ 








FBB3 






i i l 


C'.ifiDM 


EOl 


^t 






FBB3 


A5 


5D 


1 u 




i.".-- 


'_ V 


, GET VALUES FOR FIRST PAGE (*400' 




EBB 1 ? 


10 


4t: 


1 1"< 




B°L 


PA-'jCAI.O ! 


, ALWAYS 




FI3B7 






i 1 4 


i 










''t;13v 


'ci'\ 


6B 


, . .. 


■•■'.it- [■•.!- 




■' : ['; ^ 


■ TEST FOP SO OR 40 




FBE7 


70 


i' 






'■■ 


1 L -^ r 1 






KBBB 


E6 


5C 


1 1'" 




t . i.* 


-h 






FBBD 


E6 


■:C 


1 lc? 


fl>-ni ; 


i • '- 


'.H 


, BUMP CUROSR HORIZONTAL 




FBBF 


A5 


5C 


1 1 ,: .' 




L . 


'_ H 


, TEST FOR NEW LINE 




F3C 1 


C '.> 


r-. 


1 . ' ■ 




;".■ 


(-•■■ r. :•» 






FBC3 


A "5 


?B 


121 


?ct. (--- 


I ; ,-. 


; iv.'.'" '. ; r a 


■ JUST IN CASE WE HAVE 




FHC5 


90 


C. ) ' 


tc£ 






•■ , h' ... • 






FBC7 


85 


c , -> 


1^3 


SETOVH 


:-3TA 




-CURSOR AT START OF NEXT LINE 




FBC9 






; :^4 


»DF ;F 


INTO 


•■•--;■ i.'i'N ^OR WRAP AROUND 




FBC9 






; _ r _ 


9 










f BO 9 


E6 


o;.' 


.<., 


. »•',-'«!; !N 




. riC-VF CUM SOP DfiWI-J ONE L INE 




FUCB 


A? 


'"■! 






l :.'-" 




,-NTiCtPATE tJOT t-OVTOM 




f-HCD 


/- t- 


'■■ ;-. 


■ : • 




'..' r^ r - 


UiINBTM 


. TEST FOP BOTTOM 




foot 


>■:■■'. 


r;j 


i c- E ' 




BCC 


CURDN1 






FBD1 




"•'A 


13C 




l.PA 


WINTOP 






FBD3 

f-nr=r> 


•c- 


r-c 


i "! * 




BCS 


SETCV 


, BRANCH ALWAYS 






T C3 


i .. : '< 




I- i. MP 


#*S8 


, rALi^aPACE 7, 




FDiy 


D 


■:' .'• 


■ .4 




0'4r: 


TSI'Bf.l.L 






FPD9 


i'4 


it* 


13? 


CUPI.LF 


! BIT 


MODES 


; TEST FOR FORTY OR EIGHTY MODE 




FDLFj 


'0 


OS 


136 




BVS 


i.-;^T80 






r-UDD 


C6 


■50 


137 




DEC 


CH 






\-v-t-v 




C p 


i :-B 


lE» rec 


!.'F; '" 


CH 






FI-C-.l 


^f , 


'-'O 


: "'• 




i-: m t 


iE r T'..r 






'-[<(■:- 


A*. 


t; 


! 4'" 




l. DA 


CH 


. TEST FOR WRAP AROUND 




FEE'; 




■58 


141 




CMP 


LMARGIM 






FBE7 


10 


3B 


142 




HP I. 


CTRLRET 






i-'YC* 


;?o 


A4 FL< 


143 


LEFTUP 


JSR 


CURUP 






f ;-iL-a' 


A*? 


">9 


144 




L DA 


PnAPGJN 






i- 1 r- [■ 


■ j <. 


V 


1 4'-- 




■jTA 


i' H 


, r -;AVE NEW CUHSOP POSITION 




E.-r) !.-._■, 


tJ i 


;■■ • 


1 4o 




Ht-T 


CUPLEFT 


KRANTH ALUAVS 




FBF2 






14 7 


■* 










ffif;. 


° 


AO 


148 


C0UT2 


CMP 


ttSAO 


, IS IT CONTROL CHARACTER 




FBF4 


vO 


9D 


149 




BCC 


CONTROL 






h GF-j 


r^4 


■1-3 


l"50 




l?I T 


MODES 


■ TEST FOR INVERSE 




FBh'H 






1 ''- 1 




BMI 


DTSPtA/X 


, NO PUT I T OUT 


k 
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96 




■■:> A 




■; 




i >■■ 'j 




AND 


*f •'(■ 


T. T R [ H- MI D t T 




r'ftF- 1'. 


JO 


VD 


r-"i 


i ■>-, 

1*>4 


D1SPL A'. 


X J3R 


DISPLAY 






* ;rr- 




B7 


FU 


i :.^ 


IN(. HOP. 


JSR 


C'.'RIviHI 


, MOVE CUfvSOR RIGHT 




r 

f . 




• I 




i ■■■ 

i '"■- 
1 to 
iti 

1 njl 


:;* ri in 

I 

DA^'Al.' 


,. r ■; 

1 PHP 
PHA 
l.'iH 
AND 
OH A 


'jCP.?LL 

A 

#*03 

»*04 


T !" S DOTTON- RFi;p:T CH"0 ANO ifCPOLL 
, •-i.' t.T c:h LIML- 

CAl.' DASf-: ADR IN BA54L.. H 

, FLIP '.UVEN L INE NO. 

, >LINE NO ^=»17 

, ARG=OOOABCDE, GENERATE 




f-COC 


89 


5F 




164 




STA 


BAS4H 


; BAS4H»000001CD 




fcoe 


49 


OC 

... i 




165 

1 t.o 
I'-."' 




EOT 

STA 
PLA 


EAS3H 


, AND 




' : 1 .: 


;• ■■; 


!ti 




1 ^r-i 




AND 


#*1B 


, BAKvlL-EASAEOCO 




f •; ; "> 


'*0 


0? 




l<s<» 




BCC 


QSCLC3 






i ' 1 7 


t<? 


rp 




170 




ADC 


#*7F 








B'j 


5E 




1 71 

I ^".3 
! '4 


BSCLC2 


STA 

ASL 
ASL 

OR A 


DAS4L 

A 
A 
PAS4L 






■■ ■: i v 


fl': 


5E 




175 




STA 


DAS4L 






''•:.-.' ! 


8'.. 


oO 




1 76 




STA 


I3AS8L 


■ SAME FOR PAGE 2 






c-' 'J 






177 

i >:< 


CT* . F<t'T 


PLP 

PTS 

F 5 HA 




SAVf. (.HAH AC rtN 




f : ;: •. 


K'M 


&D 




131 




STY 


TEMPY 






k .-:£-. 


'1" (> 


oC 




182 




STX 


T L"MP X 






r '•:.•: a 


cv*.' 


3J 


FC 


;33 




.ISR 


CQUTl 






' . ,T 


A 4 


■=D 




; "•: J 




i.Dt 


TEMP V 






•'"-;' 


A.-. 


■*?'. 




', or. 




LP* 
PLA 


TFMPX 






» 1 jy 


ft} 






187 




RTS 








f '.33 








188 


* 










fc.3:i 


?.' '! 


6i: 


00 


18" 


CO'-JU 


JMP 


(CSWL) 


, NORMALLY C0UT1 




F " V. 


C? 


ti" 




1 • i 


r^riiCLL. 


CMP 


#»8"/ 


, BELL " 




t" . /;-.' 


DC 


■ L r'.' 




t c 'r. 




13 NK 


I.NFD 


, NO TEST FOR FORM FEEli 




f- C 3A 








1"? 


* 










FC 3A 


A.'' 


to 




1<94 


BELL 


LDX 


#*10 






FC3C 


BA 






i.<? 5 




TXA 








F-C30 

(■ ,- ■-:.:■ 
l * -► ; 


A?": 
r '. 


*■ i-. 


r ■ 


1 -'^ 
1 ' J ' 

1 '■?:*■ 


BELL 1 
BELl*.' 


7 AY 
B J 1 
BCrt 


*FFDS 






RJl 


-;•■ 


OH 


FF 


19V 


BELL3 


BIT 


»FFD8 






K >"/>.:. 


00 


FP 




2O0 




DNF 


EE1.L3 






. 1- ! 


Iv3 


r. 




r?Cl 




DEY 
PNF 


el . ;,: 






'♦ ! 


.-'■ 


J\J 


<_ > ■ 


.'-'"t") 




H *" 


I-'-CjO 






r . .1: 


P"\. 






"■■.'■ 4 




; i. 








K''.->r' 


DO 


e«: 




1 .■ '. rr. 




BNH 


r<h _i_i 






f ' .5 ! 


60 










HTf. 








(•• c ■? " 

*■*■'. '_* ■'. 
f. ■" *■ 










-.1 


JSP 


t»*5A 
■'TPL.RET 
•'. URDOWN 


iLINE feed: 

; MOVE CURSOR DOWN A LINE 












; ;; ', 




BCC 


CTRLRET 


; BRANCH IF NO SCROLL NECESSARY 




A'" 


■•/ . . 




■.'.' .' J 


"."W.JL.L 


LDA 


WINTOP 


i START WITH TOP LINE 




' " ' u 


1 . 


■■ 


'•. 




U.PL J 


PHA 
JSP 
■ n> 
;.DA 


SiETCV 
#3 
BAS4L, X 


; SAVE IT FOR NOW 
; GET BASCALC FOP THIP LINE 
MOVE CURRENT DASCALC AS DESTINATION 




r ' - . 








.M'7 




iiTA 
DEX 
DPL 


TBAS4L, X 
SCRL2 


, (TEMPORARY BASE ADDR. ) 




r " - 








c1 -' ' 




PLA 




; GET DESTINATION LINE 


k 
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97 






98 






FC6» It 




233 




CLC 










FCAC:** 01 




233 




ADC 


• i 


; CALCULATE 90URCE U« 






FC6E C3 SB 




224 




"cup 


WINBTM 


, IS IT THE LAST LINE? 






FC70 DO 15 




225 




OCS 


LASTLN 


, YES, CLEAR IT 






FC72 4H 




226 




PHrt 




, SAVE AS NEXT DESTINATION l 


INE 




FC73: 20 Bl FB 


227 




JSR 


5FTCV 


GET BASE ADDR FOR SOURCE LINE 




FC76 AS 39 




228 




LDA 


RMARGIN 


MOVE SOURCE TO DESTINATION 






FC78 4A 




229 




LSR 


A 


, DIVIDE BY 2 






F"C 79 A8 




230 




TAY 










rev a aa 




231 SCRL3 


DEY 




. DONE YET"' 






F <" >U JO E4 




r'Xc' 




BUI 


'"■■'-RI. 1 


, yds, do ne» r i irjir 






FC7D Bl 5E 




233 




LDA 


I.BAS4L), Y 








FC7F 91 62 




234 




STA 


(TBAS4L). Y 








KQIB1 60 




235 




LDA 


(UA38L). Y 


i MOVF. BOTH PAGES 






■ ,"■■! •?] 64 




23r, 




51 <\ 


1 HASfciL ) . Y 








f.-r .^. 90 p 3 




2 J •' 




HCC 


VPL 3 


, BRANCH ALWAYS 






F C8-' A "5 58 




278 L 


A5T..N 


t PA 


l.'-V.RG 1. :i 


BLANK TILL THE". LAST L irJfc" 






FC89 4A 




339 CLE0L1 


LSR 


A 


.DIVIDE DY 2 






FC8A AS 




240 




TAY 










FC8B: BO 04 




241 




BCS 


CLE0L2 








FC80 A 5 66 




;- i 42 




I.DA 


FORGND 


. (NORMALLY A SPACE > 






(■■■y t y <p i *[: 




24 3 




'i, l"A 


I3AB4L) , Y 








FC"i A 'j 67 




24-1 ; 


LF0L2 


1 DA 


:w :-t>o 


( IF 80 COLUMNS, ALSO A J-.P-V 






FC9 3. 91 60 




245 




STA 


< BASBL i . Y 








FC95 C8 




246 




[NY 










FC96 98 




247 




TtA 




i TEST FOR END OF LINE 






r-.'- ' oa 




2-'»3 




A-JL. 


« 


. MULT BY 2 AGAIN 






(-"■.78 C5 59 




249 




C W 


"r.,-;ir_, ■ 'i 








I-C9A. 9Q ED 




2 5 o 




B-"v 


:li:c!l t 


, <..nr.IT I NUE IF MORF 10 I.V- 






FC9C 60 




251 




F<TS 




, ALL DONE. 






FC9D 




252 * 














F-C9D 24 68 




253 DISPLAY 


BIT 


MC'iDt'G 


, TEST FOR 40 OR 80 






K •■>■ 7C. OC 




254 




\i:':, 


L'.f-'L lV' 


i STORE THE SIN&LE CHAR A. Teh 


ANp r.'ETVRN 




C':A1 46 5C 




2 s '.' 




■ VjF 


■ . i 


. INJURE PROPER 40 COLUMN 


. L<^, 




( CA3 06 5C 




:-?5i» 




Ai-.i. 


CH 


, DY DROPPINf} BIT 






FCA5 20 AD FC 


25? 




JSR 


DHPLBO 


.DISPLAY IN «400 PAGE 






FCAB A3 67 




23R 




LDA 


BKOND 


i AL SO SET BACKGROUND COLOR 






FCAA 91 60' 




259 D 


SPRKGNP STA 


'BAS8D. Y 








PVA-T 60 




260 




9 rvj 










fcad 




26 1 » 














FCAD 43 




262 ri 


c ,PL»0 


PH.', 




.PRESERVE CHAPACTR 






FCAE A3 3C 




263 




LDA 


CH 


. DETERMINE WICH PAGE 






FCBO: 4A 




264 




LSF 


A 








FCBl A8 




265 




TAY 










FCR2' 68 




266 




°L.A 










FCU3 BO F5 




267 




BCS 


DSPSKCN1) 


, RRAFJCH IF S90C P/.Or. 






f-CP5 91 5E 




26d 




'if A 


(BAS4L». Y 








FCB7. 60 




269 




RT5 










FCD0 




270 * 














FCB8 Bl 7E 




271 NOTC* 


l.DA 


( INBUF), Y 


i ECHO CHARACTER 






FCBA 20 25 f 




272 




JSR 


COUT 








fchp C9 aa 




273 




■: up 


**88 


, BACMSPAf E " 






FCBF FO ID 




274 




Dtl'V 


BH.SPCE 








FCC1 C9 98 




27} 




CMP 


#»98 


, CANCCL."' 






FCC3 FO 08 




27a 




liLG 


CANCEL 








FCC 3: E6 80 




277 




INC 


TEMP 








FCCV A5 go 




278 




■. DA 


TEMP 








FCC9 C'i V> 




279 




■::nf» 


*1NBUFLEN 








FCCB: DO 17 




;.'so 




BNE NXTCHAR 


, NO WRAP AROUND ALLOWED 






FCCD: A9 DC 




J!81 


CANCEL LDA #*DC 


; OUTFLT 3ACKSLA5H 






FCCF ?.<•> 3» 


FC 


282 




JSR COUT 








FCD2: 20 EF 


FC 


283 




JSR CROUT 








FCDS. 




284 


GETLNZ EQU * 








FCD5: A5 6B 




295 


OETLN 


LDA PROMPT 








FCD7: 20 23 


FC 


286 




JSR COUT 








FCDA: AO 01 




287 




LDY #1 








fCDC:84 SO 




288 




STY TEMP 


; START AT BEGINNING OF 


INBUF 




FCDE: A4 80 




289 


BKSPC 


S LDY TEMP 








FCEO: FO F3 




290 




BE 


CETLN 








FCE2: C6 80 




291 




DEC TEMP 


; BACK UP INPUT DUFFER 






FCE4: 20 60 


FD 


292 


NXTCHAR JSR RDCHAR 


; GET INPUT 






FCE7: A4 80 




293 




LDY TEMP 






k 
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99 








100 




FCE9 


91 


7E 


294 






STA 


i INBUF). Y 






FCEB 


C9 


8D 


295 






CMP 


#*8D 






FCED 


DO 


C9 


296 






BNE 


NOTCR 






FCEF 






297 


CROUT 


EQU 


♦ 






FCEF 


2C 


oo 


CO 293 






BIT 


KBD 


> TEST FOR START/STOP 




FCF2 


10 


13 


f/T-T 






BPL 


NOSTOP 






FCF4 


20 


2E 


FD 300 






J r 'P 


KEYIN3 


; READ KBD 




FCF7 


C 


AO 


301 






CMP 


S?A0 


i IS IT A SPACE? 




FCF9 


r-o 


07 


302 






BEG 


STOPLST 


YES, PAUSE TIL NEXT KEYPRESS 




FCFB 


C9 


8D 


303 






C M? ; 


#S8D 


i QUIT THIS OPERATION? 




FCFD 


DO 


08 


304 






v;> 


NOSTOP ; 


NO- IGNORE THIS KEY 




FCFF 


4C 


8B 


FA 305 






JMF 


Er'-rr.jR2 


; YES. RESTART 




FD02 


AD 


00 


CO 306 


STOPLST 


LDA 


c,l"; D 






FD05 


10 


KB 


307 






BPL 


"TCiPL-ST 






FD07 


A9 


8D 


303 


NOSTOP 


LDA 


ftTPD 






FD09 


4C 


25 


FC 309 






JMP 


cout 






FDOC 






310 


♦ 












FDOC 


6C 


70 


00 311 


RDKEY 


JMP 


(KSWL) 






TDOF : 






312 


* 












FDOF : 


A9 


7F 


313 


KEY 


N 


LDA 


#*7P 


MAKE KUP-T-. FIRST IS CUKSUR 




FDil 


85 


63 


314 






STA 


TBAS4H 






FD13: 


20 


88 


FD 315 






JSR 


PICK 


GO READ SCREEN 




FD16: 


48 




316 


KEY INI 


PHA 




SAVE "HP AT CUF.-CR I-rniTICN 




FDj7: 


20 


35 


FD 317 






JSR 


KEYWAIT 


TEST FOR KEYPRESS 




FD1 A: 


BO 


08 


318 






BCS 


KEYIN2 


GO SET IT 




FD 1 C ■ 


A5 


69 


319 






LDA 


CURSOR ; 


3IVE THEr -V-. UNDERSCORE FOR A TIME 




FD1E: 


20 


9D 


FC 320 






JSR 


DISPLAY 






FD21: 


20 


35 


FD 321 






JSR 


KEYWAIT 


GO <5EE IF KEYPRESSED 




FD24 


68 




322 


KEYIN2 


PLA 








FD25 


08 




323 






PHP 


; SAVE KEYPRESS STATUS 




FD26 


4o 




324 






PHA 








FD2 7. 


20 


9D 


FC 325 






JSR 


DISPLAY 






FD2A: 


68 




326 






PLA 








FD2B 


23 




327 






PLP 








FD2C: 


90 


EB 


328 






BCC 


KEYIN1 






FD2E : 


AD 


00 


CO 3?9 


KEY INS 


l.DA 


KBD 


READ KEYBOARD 




FD31 : 


2C 


10 


CO 330 


VTY ' 


MA 


HIT 


KHDSTRB 


CLEAR KEYBOARD STROBE 




FD34: 


60 




331 






HTS 








FDC'D: 


E6 


62 


332 


KEY* 


AIT 


T f :r 


TLAS4L 


JUST KEEP COUNTING 




FD37 


DO 


09 


333 






t' r 


KWAIT2 






FD39 


E6 


63 


334 






Jr. ' 


TflASdH 






FD3R 


A l > 


7F 


335 






LDA 


«t*?r 


TEST FOR DONE 




FD?,i;. 


IB 




j36 






CLC 








FD3E 


25 


63 


337 






AND 


TBAS4H 






FD40 


-0 05 


336 




BEQ 


HEYRET i RETURN IF TIMED OUT 




FD42: 


JE 00 CO 339 KWAIT2 


ASL 


KBD 








F"D45 


?o Ft-: 


340 




DCC 


KEYWAIT 






FD4? 


bO 




341 KE 


RE! 


Rrs 










FD4G 






342 * 














FU48 






343 » 














FD48 






344 ESC3 


EQU 


* 








FU4B 


:0 77 FD 345 




JSR 


eoEsc 






rr.-in 


*5 68 


346 ES' 


;ak>e 


l.DA 


MODES 3fc ! TO 


+ MOM H3R ■•>! r ' ■ ■!•■ >'■ ',': •: 




f-D-U) 


39 BO 


347 




AND 


**eo 








f nir 


»9 AD 


348 




EOR 


#«AD 








FD51: ( 


3b 69 


349 




STA 


CURSOR 






FD53: 20 OC FD 350 ESC1 


JSR 


RDKEY jRFAD NEXT CHARACTER 




FD56. 1 


«) 08 


351 




LDY 


•8 


. TEST FOR ESCAPE COMMAND 




l-f'58 


}9 FO FF 35* ES< 




CMP 


ESCTABL, Y 






FI'i'jD 1 


-0 EB 


353 




BEQ 


ESC 3 








Fl'^D 


38 




354 




DEY 










FD5E 


10 F8 


355 




BPL 


ESC 2 


.LOOP TIL FOUND OR ZiUUV. 




FD60 






356 » 














FU60 / 


\9 BO 


357 RDCHAR 


LDA 


**eo 


;G0 READ A CHARACTER 




FDf..:?. . 


35 68 


"<58 




AND 


MODES 






FT64 f 


35 69 


35"> 




STA 


CURSOR . SAVE STANDARD COR SOP 




f-066 . 


20 C 


•C FD 360 




JSR 


RDKEY 






FD69: < 


:9 90 


361 




CMP 


#•98 


j ESCAPE CHARACTER ■ 




FD6G 1 


r DE 


362 




BEQ 


ESCAPE 






FD6D < 


:9 95 


363 




CMP 


#»95 


; FORWARD COPY"' 




J-D6F I 


;0 D6 


364 




BNE 


KEYRET 






FD7j ; 


:0 08 FD CI65 




JSR 


PICK 


; GET CHARACTER FROM SCREt.1-' 
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97 






98 






FC6» 1* 




2X3 




CLC 










FC4C: A* 01 




223 




ADC 


»i 


; CALCULATE SOURCE LIME 






FC&E.C9 56 




224 




"chp 


WINBTM 


, IS IT THE LAST LINE? 






FC70 DO 15 




225 




8CS 


LASTLN 


, YES, CLEAR IT 






FC^i 4tt 




226 




PHA 




, SAVE AS NEXT DESTINATIQtM 1 


INE 




FC73: 20 Bl FB 


227 




JSH 


5ETCV 


GET BASE ADDR FOR SOURCE LINE 




FC76 AS 59 




228 




LDA 


RMARGIN 


MOVE SOURCE TO DESTINATION 






FC78 4A 




229 




LSR 


A 


i DIVIDE BY 2 






F "C 79 A8 




230 




TAY 










f'C7A 88 




231 SCRL'j 


DEY 




, DONE YET - ' 






F <" 'B JO E4 




r'Hc' 




HI1! 


'"■' Rl. 1 


, yes. do fje« r l inc: 






FC7D Bl 5E 




?.:n 




LDA 


i. BAS4L ) , Y 








FC7F 91 62 




234 




STA 


<TBAS4L>. Y 








[•LQ1:B1 60 




235 




LDA 


(BA38L), Y 


i MOVE BOTH PAGES 






• .'■'■', <?! 64 




23ft 




STA 


I'BASdL ) . Y 








F-r •>'■■ 90 F3 




2 J - T 




HCC 


r ;."»L ..i 


, BRANCH ALWAYS 






F 1-.3' A "5 58 




278 L 


A3T...N 


i OA 


!."',•'»• G I :l 


BLANK FILL THE LAST ; IFJE 






FC89 4A 




239 CLE0L1 


LSR 


A 


, DIVIDE BY 2 






FC8A A8 




240 




TAY 










FCBB: BO 04 




241 




BCS 


CLEUL2 








F'C«0 A 5 66 




:-?42 




LDA 


F-'OBGND 


. (NORMALLY A SPACE ' 






f •f-'H' 91 *[■; 




24 3 




'i rA 


BAB4L' . Y 








F '.'■>: AV 67 




24-1 : 


Lf-OL.2 


I da 


BkvfJD 


(If- 80 COLUMNS. ALSO A J-.P-V 


'.'. 




FC93 91 60 




245 




STA 


( BASBL I . Y 








FC95 C8 




246 




I.NV 










FC96 98 




247 




VyA 




i TEST FOR END OF LIME 






r -.''-! oa 




2 4 3 




ArJL. 


« 


. MULT BY 2 AGAIN 






F'.rB C5 5? 




24 V 




C MP 


"r.,-;tr_, in 








I-C9A <?0 El) 




2 5 .> 




B*: v 


cleoli 


, cnNriNUE IF MORE 10 [V- 






FC9C 60 




251 




NTS 




, ALL DONE. 






FC9D 




252 * 














K'D 24 6B 




253 DISPLAY 


BIT 


MODES 


, TEST FOR 40 OR BO 






f-c ■;■ 7c. oc 




254 




B'-O, 


l'.pi (>■.■ 


i STORE THE SINGLE rnA«A;TFt 


AMf! rVET'.'RN 




f - Al 46 5C 




1^ "I '.' 




: ~,P 


■ . i 


. INJURE PROPER 40 COi.JMN C 


. L^ "' 




f ca;.i 06 5C 




:-??* 




Ail. 


in 


. BY DROPPING BIT 






FCA5. 20 AD FC 


257 




JSH 


DSP L BO 


.DISPLAY IN *400 PAGE. 






FCA8. A3 67 




25R 




LDA 


BKOND 


;ALSU SET BACKGROUND COF.OF 






FCAA 91 60' 




259 D 


SPRKGND STA 


•BASBL ). Y 




- 




FfAC 60 




260 




f? rvj 










fcad 




261 » 














f'CAD 45? 




U.62 [' 


c :PLt'<'j 


PHA 




, PRESERVE CHAPACTEP 






FCAE A3 5C 




263 




LEA 


CH 


DETERMINE WICH PAGE 






FCBO: 4A 




264 




lSP 


A 








FCBl A8 




365 




TAY 










FCB2 68 




266 




PL. A 










FCB3 BO FS 




267 




BCS 


DSPBKGNl) 


, BRAFJCH IF *S00 P.',Or. 






FCF5 91 5E 




26S 




LiTA 


<BAS4L>. Y 








FCB7. 60 




269 




RT5 










FOBS 




270 » 














FCB8 Bl 7E 




271 NOTCK 


LDA 


< INBUF). Y 


, ECHO CHARACTER 






FCBA 20 25 f 




272 




JSR 


COUT 








r-'CBP O 88 




271 




•■: rir* 


#»88 


, BACKSPACE' 






FCBF FO ID 




274 




BCi 


BKSPCE 








FOCI C9 98 




275 




>:mp 


#•99 


, CANCEL"' 






Fcc:r fo oa 




27a 




BECi 


CANCEL 








FCC 3 E6 80 




277 




INC 


TEMP 








FCC7 A5 so 




2 78 




l DA 


TEMP 








FCC 9 C r < 'j'.) 




279 




■:: MP 


fclNBUFLEN 








FCC B: DC' IV 




230 




BNE NXTCHAR 


, NO WRAP AROUND ALLOWED 






FCCD: A9 DC 




281 


CANCEL LDA #*DC 


i OUTPUT BACKSLASH 






FCCF SO 3tt 


FC 


282 




JSR COUT 








FC.D2: 20 EF 


FC 


283 




JSR CROUT 








FCDS. 




234 


GETLNZ EGU * 








FCDS: AS 6B 




285 


GETLN 


LDA PROMPT 








FCD7:20 2S 


FC 


286 




JSR COUT 








FCDA: AO 01 




287 




LDY #1 








fODC:BA 80 




288 




CTV TEMP 


; START AT BEGINNING OF 


INBUF 




FCDE: A4 80 




289 


BKSPC 


=! LDY TEMP 








FCEO: FO F3 




290 




BE 


GETLN 








FCE2:C6 80 




291 




DEC TEMP 


; BACK UP INPUT BUFFER 






FCE4: 20 60 


FD 


292 


NXTCMAR JSR RDCHAR 


; ©ET INPUT 






FCE7; A4 80 




293 




LDY TEMP 
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99 








100 




FCE9 


91 


7E 


294 






STA 


< INBUF). Y 






FCEB 


C9 


8D 


295 






CMP 


#*8D 






FCED 


DO 


C9 


296 






BNE 


NOTCR 






FCEF 






297 


CROUT 


EQU 


* 






FCEF 


20 


OC 


C? 298 






BIT 


KBD 


> TEST FOR START/STOP 




FCF?. 


10 


13 


ci'rh' 






BPL 


NOSTOP 






FCF4 


20 


2E 


FD 300 






J-vp 


KEYIN3 


; READ KBD 




FCF7 


C 


AO 


301 






CMP 


S$AO 


; IS IT A SPACE? 




FCF9 


FO 


07 


302 






BEO. 


ETOPLST 


YES, PAUSE TIL NEXT KEYPRESS. 




FCFB 


C9 


8D 


303 






C M? ; 


#S8D 


iQUIT THIS OPERATION? 




FCFD 


DO 


OB 


304 






! " .' ' 


NOSTOP ; 


NO. IGNORE THIS KEY 




FCFF 


4C 


8B 


FA 305 






J MP 


Er-|- r JR2 


YES. RESTART 




FD02 AD 


00 


CO 306 


STOPLST 


LDA 


r-.DFj 






FD05' 10 


FB 


307 






BPL 


"TGfLST 






FD07 A9 


SD 


308 


NOSTOP 


LDA 


ft TPD 






FD09 4C 


25 


FC 309 






JMP 


CUUT 






FDOC . 




310 


* 












FDOC. 6C 


70 


00 311 


RDKEY 


JMP 


( KSWL ) 






FDOK: 




312 


» 












FDOF: A9 


7F 


313 


KEYJ 


N 


LDA 


#*7F 


MAKE PL'f-'F. FIRST IS CUrtSUR 




FD1 1 85 


63 


314 






STA 


TBAS4H 






FD13: 20 


88 


FD 315 






JSR 


PICK 


GC READ SCREEN 




FD16; 48 




316 


HEY INI 


PHA 




SAVE CHF AT CuF.-GR f-r^ITICN 




FD57: 20 


35 


FD 317 






JSR 


KEYWAIT 


TEST FOR KEYPRESS 




FD1 A: BO 


08 


318 






BCS 


KEY INS 


GO SET IT 




FD1C A5 


69 


319 






LDA 


CURSOR i 


3IVE THE."! ••,<: '.INDF.RSCORE FOR A TIME 




FD 1 E : 20 


9D 


FC 320 






JSR 


DISPLAY 






FD21: 20 


35 


FD 321 






JSR 


KEYWAIT 


GO SEE IF KEYPRESSED 




FD24. 68 




322 


KEYIN2 


PLA 








FD25: 08 




323 






PHP 


; SAVE KFVPRES8 STATUS 




FD26 4o 




324 






PHA 








FD27: 20 


9D 


FC 325 






JSR 


DISPLAY 






FD2A: 68 




326 






PLA 








FD2E 23 




327 






PLP 








FD2C: 90 


E8 


328 






BCC 


KEYIN1 






FD2E: AD 


00 


CO 3?9 


KEYIN3 


t DA 


KBD 


READ KEYBOARD 




FD31 : 2C 


10 


CO 330 


i'FV !' 


NO. 


HIT 


KHDSTRH 


CLEAR KEYBOARD GTFIIEE 




FD34: 60 




331 






RT? 








FEO'J: F.6 


62 


332 


KEYW 


AIT 


rv.„- 


Ti,A54L 


JUST KEEP COUNTING 




FD37 DO 


09 


333 






!:' 'F 


K WAITS 






FD39: E6 


63 


334 






Jr. ' 


TBA54H 






FD3B A 1 "/ 


7F 


335 






LDA 


#*7r ; 


TEST FOR DONE 




FD3i; IK 




336 






CLC 








FD3E 25 


63 


337 






AND 


TBAS4H 






FTJ40 FO 05 


336 




BEO 


KEYHET i RETURN IF TIMED OUT 




FD420E 00 CO 33? KWAIT2 


ASL 


KBD 








f"045 90 FH 


340 




DCC 


KEYWAIT 






FD4? 60 




341 KE 


•RET 


Rrg 










FD4Q 




342 » 














FD48 




343 » 














FD48 




344 E5C3 


EQU 


# 








FD4B 20 77 FD 345 




JSR 


GOESC 






rr.-TB A 5 68 


346 ES< 


:ape 


I..DA 


MODES Sh 1 TO 


♦ F.. ION F(jR ;r'.J r '-- ■>" v. .,•; ■■ 




f-DJI) 29 bO 


347 




AND 


#*80 








f 1V4F 49 AB 


348 




EOR 


«CAD 








FD51 85 69 


349 




STA 


CURSOR 






F 053:20 OC FD 350 ESC 1 


JSR 


RDKEY ; RFAD NEXT CHARACTER 




FD56. AO OB 


351 




LDY 


#8 


. TEST FOR ESCAPE COMMAND 




I-D58 D' fO FF 352 ES( 




CMP 


ESCTABL, Y 






FH'jD FO EB 


353 




BEO 


ESC 3 








F [/?[) B8 




354 




DEY 










FD5E. 10 FB 


355 




BPL 


ESC 2 


i LOOP TIL FOUND uR DQUl- 




FD60 




356 » 














FDfcO A9 BO 


357 RDCHAR 


LDA 


*«eo 


i GO READ A CHARACTER 




FPf,:.?. 25 68 


•558 




AND 


MODES 






f'Pi-4 B5 69 


35* 




STA 


CURSOR . SAVE STANDARD CURSOR 




FD66 20 C 


C FD 360 




JSR 


RDKEY 






FD69: C9 9D 


361 




CMP 


#»9B 


i ESCAPE CHARACTER 




FD6B FO DE 


362 




BEO 


ESCAPE 






FD6D C9 95 


363 




CMP 


»$95 


; FORWARD COPY"' 




FD6F DO lib 


364 




BNE 


KEYRET 






FD71 20 SB FO ;i65 




JSR 


PICK 


i GET CHARACTEP FROM SCttl-' 


k 


Page 0061 of 0170 j 



t 














> 










Apple 


Computer Inc. Patent : 4_383_296 














4,383,296 










101 






102 




FD74 09 80 


366 




OR A 


#«B0 . SET 


TO NORMAL ASCII 




FD76: 60 




367 




RTS 








FD77: 




368 


* 










FD77: A"? FB 


369 


OOESC 


LDA 


tKCLSCRN 






FD79 48 




370 




PHA 








FD7A B9 7F Ft) 


371 




LDA 


ESCVECT, Y 






FD7D 48 




372 




PHA 








FD^E 60 




373 




RTS 








FD7F 




374 


■» 










FD7F 8D 




375 


escvfct 


DFB 


CLEOL-1 






FD80 70 




376 




DFB 


CLEOP-1 






FD81 o:; 




37"' 




DFB 


CLSCRN-1 






FDR? •••:: 




379 




DFB 


C0L40-1 






FDB3 49 




379 




DFB 


CQL80-1 






FD84 DB 




380 




DFB 


CURLEFT-1 






FD8? B6 




381 




DFB 


CURIGHT-1 






FD8fr- CP 




38i 




DFB 


CURDOUN-1 






FIVj/ A3 




383 




DFB 


CURUP-1 






F !'-fl3 




334 


* 










FP88 A5 5C 


385 


PICK 


LDA 


CH . GET 


A CHARACTER AT CURRENT CURSOR POSITIOr> 




FD8A 4A 




386 




LSR 


A .DETERMINE WHICH PAGE 




FD8B A8 




387 




TAY 








F:)3C 24 i 


a 


:<88 




BIT 


MODES . AND 


IF 80 COLUMN MOI'K 




f i. St; 50 


f 


38" 




BVC 


PICK 40 (=0Ri5 


ET CARRY' IK 40 ;1 i.U.UMHS 




' I 'JO 90 


;> 


390 




BCC 


P1CK40 \,b.T 


CHARACTFR FRMM «400 "ACE 




FD92 Bl 60 


391 




LDA 


(BAS8L). Y 






FD--4 60 




392 




RTS 








FD95 Bl 5E 


393 


PICK40 


LDA 


(BAS4L), Y 






F D9. 7 60 




394 




RTS 








FOWQ 




395 


* 










FD98: 






2 CLDSTRT f.Aiu * 






FD98: A9 


03 




3 




LDA #*3 






FD9A: 8D 


DO 


FF 


4 




STA *FFDO 


; ZERO PAGE IS ON 3! 




FD9D: 






5 SE' 


' \./r 


EOU * 






FD9D: D8 






6 




CLD 


;0F COURSE! 




FD9E: A2 


03 




'/ 




LDX #3 






FDAO: 86 


7F 




8 




STX INBUF+1 






FDA2: BD 


BC 


FF 


9 SETUP 1 


LDA NMIRQ. X 






FDA5: 9D 


CA 


FF 


10 




STA $FFCA, X 






FDA8: BD 


B4 


FF 


11 




LDA HOOKS, X 






FDAB: 95 


6E 




12 




STA CSWL, X 






FDAD: BD 


B8 


FF 


13 




LDA VBOUNDS 


X 




FDBO: 95 


58 




14 




STA LMARGIN 


X 




FDB2: CA 






15 




DEX 






FDB3: 10 


ED 




16 




DPI. FET'JFl 






FDB5: 85 


82 




17 




~TA ISDRVN 






FDB7: A9 


AO 




18 




LDA #*A0 


; INPUT BUFFER AT »3A0 




FDB9: 85 


7E 




19 




STA INBUF 






FDBB: A9 


60 




20 




LDA #»60 






FDSD: 85 


81 




21 




STA IBSLOT 






FDBF: A9 


FF 




22 




LDA «*FF 






FDC 1 : 85 


68 




23 




STA MODES 






FDC3: 20 


4F 


FB 


24 




USR C0L40 


. ; SET 40 COLUMNS, CLEAR SCREEN 




FDC6: 






25 * 










OOAO 






27 ADR 




EQU »A0 






OOAO. 






28 CPORTL 


EQU ADR 






00A1 






29 CPORTH 


EGl' AOR + 1 






OOAP 






30 CTFMP 


EV.' .-\r.R<r 






00A3 






31 C TEMPI 


r ■•. ADP^-3 






00 A 4 






32 YTEMP 


E'jc '■■W 1-4 






G0B4 






33 ROWTEMF 


Eiju b.\j*"-20 






CODE 






34 CWRTON 


F<V-' *0ODfl 






COPA 






35 CWP' 




•ICODA 






fff.; 






35 •:: 


■ i* 


. >J *FFEC 






FTK!) 






'37 •' 




y-y.' tf'FFD 






FDC 6 






?u » 










FDC 6. 






19 » 










FDC 6 A 9 


78 




40 GENLNTR 


LDA #«78 


i INIT SCREEN INDX LOCATIONS 




tlKS 85 


AO 




■*\ 




5TA CORTl 






FPCA A 9 


08 




4i 




LDA »ti7l 






FDCC 8"? 


Al 




A? 




~fA rmiRTH 




k 


Page 0062 of 0170 a 



t 














> 










Apple Computer Inc. Patent : 4_383_296 














4,383,296 










103 






104 




f-DCE A 9 


FO 


4 4 




!.PA 


#-:40 


, SET UP INDEX ID CHR5ET 




r-uno P5 


A4 


4*i 




51" A 


Y TEMP 






FDD2 A 9 


00 


Jfc 




LDA 


#0 






r i:r;4 a-% 








! A » 








;■,[-,•■ « 5 


34 


.. 


> ;■ 'r/vi 




. FuWTFI'lP 


< 




Fi'IV* f" : ! 








i !■■: ' 








M/D8 EO 


20 


"_. ! ^ 




". r * 


#*20 






FD»A UO 


r- - 


L 




3 ME 


r IPTEMPS 






fdd>: A4 


O r T 


e; ' 




i.OA 


#'.. 


, FAKE THE FIRST BIT PATTERN 




r t)j'C-" i; 




• 




, t 




■•pHAUTan ?TH bli <--:hiftet a- Eii o- 




■■ L'l.f UlJ 




' A 




•'Hi-' 








'-- -ie: 




' 




-■ > - .'» 








• ,;t- 1 £fc 


A2 


7-c. 


vf.'i'i "0 


•:*l t 


C TEMP 


■ CuiNEHAi E "mE A"! I I 




• .,•; ■' A" 


'•' 




,,M-, I 1 


'.. v ' 


# ' 


. CODES ' CF T^F FiHST paf.-; 




••■[■•r-.'.- A:. 


Ai 


C 'G 


,.A-'< I? 


T 


ntfip 
















.^•(jR'TL 


; *■ ■■■F-CHf? •' 4 
*yxE-'. :)R i 




r ;,r'i f. -1-- 




C. *' 




;.'t v 




«XXD=CHR 2 t 




f : F. '". >.' 


-.. 


C ~ 




"" r-> 1 


'-•ACC 14 


. Ji>C=CHK J . 7 




r-OKt. v. o 

(•!■.-■.' I ■ 
r- i ■- r 

■ ; ;. .1 


' 




.-' ... ' - 


i'- > 
■a. 

'i c >■; 
,|1F 


..."."_: [2 
1 1 < . I- OR T 

vUvtes 

«*A 


t .. X ii =C - f , 4 

I ^. .' .-!■- .. ' T I J 

i ■. \ -f - HK ... 6 

h '*»?-. HP 3 
i.'fC IvFCDrF ChrtPiACTFR TAI3I E 
T-E-:2ND SET DP 4 




l-r-.r. •■ ;. 


r-. r . 






:-;m-: 


CASC I 1 






- 










4< ■■.■. 


!. ■ ■• ';■■; ►' .'v «!<"' . ' 




. . 






li • '►'-!■ 






!■■ ; •" r .; ,w t M [ T "-'."' F'Sf'i 




f i-o;: i:a 








f'l.F 








[■'!■ '3 A.-. 


i - 


• = 




. nx 


#23 


; (4 CHARACTERS O r ' v> P0U.5 > 




r-t; '_ -V 


r 




'_ ': ' l. lis 


- L'T 


.' ,,W1E'-!F r 
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1 i ' 




h ; r 


CWRTON . ' GENERATOR RAH 




FE4D 20 AE F' 


1 ie 




.'■' 


VRETRCE (WAIT 


FOR NEXT VERTICAL RETRACE 




FF.50 A9 2 





1 1 ■"■' 




I.. A 


#•20 


; WAIT 


ASA It; 
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139 UNDER 


STA 


*SFC 


, Y 






FE7C '" F^ 0"' 


140 




STA 


•7FC 


, Y 






FE^F r irl 
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FC89 


CLE0L1 




FB8E 


CLEOL 


FC91 CLE0L2 




FB71 CLEOP 
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I claim: 

1. In a digital computer which includes a central 
processing unit (CPU), a random-access memory 
(RAM), an address bus interconnecting said CPU and 
RAM such that said CPU addresses locations in said 
RAM and a data bus interconnecting said CPU and 
RAM, said CPU for certain functions addressing prede- 
termined locations in said RAM with a predetermined 
range of address signals, an improvement comprising: 

detection means for detecting said predetermined 
range of address signals, coupled to said address 
bus; 

register means for storing digital signals, coupled to 
said data bus, and; 

switching means for coupling said digital signals 
stored in said register means to said address bus 
when said detection means detects said predeter- 
mined range of said address signals; 

whereby data for said certain functions normally 
stored by said CPU in said predetermined locations 
may be stored elsewhere in said RAM, thereby 
enhancing the performance of said computer. 

2. The improvement defined by claim 2 wherein said 
detection means detects all binary zeros. 

3. The improvement defined by claim 1 wherein said 
switching means comprises a multiplexer controlled by 
said detection means for selecting said register means. 

4. The improvement defined by claim 1 including a 
read-only memory coupled to said address bus and said 
data bus. 

5. The improvement defined by claim 4 wherein said 
stored signals in said register means provide a pointer 
for locations in said RAM during a direct memory ac- 
cess transfer. 

6. The improvement defined by claim 5 wherein said 
read-only memory in response to signals on said address 
bus provides instructions to said CPU causing it to 
increment address signals during said direct memory 
access transfer. 

7. In a digital computer which includes a central 
processing unit (CPU), a random-access memory 
(RAM), an address bus having a first plurality and a 
second plurality of lines for coupling said CPU with 
said RAM, and a data bus interconnecting said CPU 
and RAM, said CPU for certain operations addressing 
predetermined locations in said RAM with address 
signals on said first plurality of lines by coupling a pre- 
determined address on said second plurality of lines, an 
improvement comprising: 

register means for storing signals, coupled to said data 
bus; 

multiplexing means coupled to said second plurality 
of lines and said register means for selecting signals 
from one of said second plurality of lines and said 
register means; 

logic means coupled to said second plurality of lines 
and said multiplexing means for causing said multi- 
plexing means to select signals from said register 
means when said CPU couples said predetermined 
address on said second plurality of lines; 

whereby said signals from said register means pro- 
vide alternate locations in RAM for storage associ- 
ated with said certain operations. 

8. The improvement defined by claim 7 wherein said 
predetermined address is all binary zeros. 
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9. The improvement defined by claim 7 including a 
read-only memory coupled to said address bus and said 
data bus. 

10. The improvement defined by claim 8 wherein said 
stored signal in said register means provides a pointer 
for locations in said RAM during a direct memory ac- 
cess transfer. 

11. The improvement defined by claim 9 wherein said 
read-only memory in response to signals on said address 
bus provides instructions to said CPU causing it to 
increment address signals during said direct memory 
access transfer. 

12. In a digital processor used in conjunction with a 
display, said processor including a data bus and an ad- 
dress bus, a memory comprising: 

a first plurality of memory devices for storing data, 
coupled to receive data from said data bus; 

a first memory output bus coupled to receive data 
from said first plurality of memory device; 

a second plurality of memory devices for storing data 
coupled to receive data from said data bus; 

a second memory output bus coupled to receive data 
from said second plurality of memory devices; 

addressing means coupled to said address bus for 
providing address signal for addressing said first 
and second plurality of memory devices; 

first switching means for selecting data from one of 
said first and second memory buses for coupling to 
said data bus, said first switching means coupled to 
said first and second memory bus and said data bus; 

second switching means for selecting data from said 
first and second memory buses for coupling to said 
display, said second switching means coupled to 
said first and second memory buses and said dis- 
play; and, 

circuit means for coupling one of a selected said first 
and second memory buses to said addressing means 
such that data from said selected one of said buses 
provides addressing information for selecting sub- 
sequent locations in said memory devices when 
said data bus is receiving data from the other of 
said memory buses, 

whereby said memory provides data for a high reso- 
lution display and whereby some data stored in said 
memory is used for remapping locations in said 
memory. 

13. The memory defined by claim 12 wherein said 
circuit means comprises a multiplexer, said multiplexer 
selecting between said data from said selected one of 
said buses and bank switching signals coupled to said 
multiplexer. 

14. The memory defined by claim 13 wherein said 
multiplexer is controlled by a logic circuit which is 
coupled to said address bus and said selected one of said 
buses. 

15. The memory defined by claim 14 wherein said 
logic circuit causes said multiplexer to select said bank 
switching signals each time said processor switches an 
OP code. 

16. In a digital computer with a memory, which is 
used in conjunction with a raster scanned display, said 
display including a digital counter which provides a 
vertical count representative of the horizontal line 
scanned by the beam for said display, said memory 
providing data for displaying rows of characters, an 
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addressing means coupled to said memory for scrolling 

displayed characters, comprising: 
an adder having a first and a second input terminal, 
the output of said adder providing a portion of an 
address signal for said memory, said first terminal 
of said adder being coupled to receive the lesser 
significant bits of said vertical count; 
said computer providing a periodically repeated se- 
quence of digital numbers coupled to said second 
terminal of said adder, said sequence of digital 
numbers provided by said computer having a maxi- 
mum value equal to the number of scanned lines in 
each of said rows, 
whereby the characters on said display are scrolled 
with a minimum of movement of data within said 
memory. 

17. The addressing means defined by claim 16 
wherein said sequence of digital numbers is incremented 
for each displayed frame. 

18. In a ditital computer which includes a single chip 
central processing unit (CPU), a random-access mem- 
ory (RAM), an address bus interconnecting said CPU 
and RAM such that said CPU addresses locations in 
said RAM, and a data bus coupled to said CPU and 
RAM, said CPU for certain functions addressing the 
zero page in said RAM by providing binary zeroes on 
certain lines of said address bus; an improvement com- 
prising: 

a detection circuit for detecting said binary zeroes on 
said certain lines of said address bus; 

a register for storing digital signals, said register cou- 
pled to said data bus for receiving digital signals 
from said data bus; and, 

a multiplexer for selecting between said digital signals 
stored in said register and said certain lines of said 
address bus, said multiplexer being controlled by 
said detection circuit so as to select said register 
when said binary zeroes are detected on said cer- 
tain lines of said address bus; 

whereby data for said certain functions normally 
stored on page one of said RAM, may be stored 
elsewhere in said RAM, and still easily addressed 
by said CPU. 

19. The improvement defined by claim 18 wherein 
one of said stored signals from said register is coupled to 
said multiplexer through an exclusive OR gate, said gate 
being coupled to one of said certain lines of said address 
bus. 

20. The improvement defined by claim 18 or 19 
wherein said computer provides an alternate stack sig- 
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nal and wherein said detection- circuit also detects ad- 
dresses for page one on said address bus, and said multi- 
plexer selects said register if said page one addresses are 
detected and said alternate stack signal is in a predeter- 
mined state. 

21. In a digital computer which includes a central 
processing unit (CPU), a random-access memory 
(RAM), an address bus interconnecting said CPU and 
RAM such that said CPU addresses locations in said 
RAM and a data bus interconnecting said CPU and 
RAM, said CPU for certain functions addressing prede- 
termined locations in said RAM with a predetermined 
range of address signals, an improvement comprising: 

detection means for detecting said predetermined 
range of address signals, coupled to said address 
bus; 

register means for storing digital signals, coupled to 
said data bus, and; 

switching means for coupling said digital signals 
stored in said register means to said address bus 
when said detection means detects said predeter- 
mined range of said address signals, said switching 
means also for coupling said digital signals stored in 
said register means to said address bus when a 
certain direct memory access (DMA) signal is in a 
predetermined state; 

a read-only memory (ROM) coupled between said 
address bus and said data bus, said ROM in re- 
sponse to signals on said address bus providing 
instructions to said CPU on said data bus to cause 
said CPU to increment address signals when said 
DMA signal is in said predetermined state; 

said register providing a pointer for locations in said 
RAM when said DMA signal is in said predeter- 
mined state, and said register providing RAM ad- 
dress signals when said certain functions are se- 
lected by said CPU, 

whereby data for said certain functions normally 
stored by said CPU in said predetermined locations 
may be stored elsewhere in said RAM, thereby 
enhancing the performance of said computer. 

22. The improvement defined by claim 21 wherein 
said switching means comprise a multiplexer which 
selects said register when said detection means detects 
all binary zeroes or when said DMA signal is in said 
predetermined state. 
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by 
David Craig 
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1986 



This document describes the Apple /// microcomputer ROM organization. The ROM 
listing used was from Apple Computer's patent (# 4,383,296) of May 10. 19B3 as 
assigned to Wendell B. Sander. The ROM listing appears to be from December 20, 1979. 

The ROM occupies 4K bytes of memory in the address range $F000-$FFFF. This ROM 
is used by the Apple /// at system power- up to test various hardware components, 
initialize the character generator bitmap, and boot SOS (Sophisticated Operating 
System) from the Apple ///'s internal floppy diskette drive. 

The ROM is organized as follows (routine names in lowercase were created by me 
since the source code did not contain a name at the particular location): 



Addresses | Name 



I Description 



F000- 
F125- 
F12B- 
F13E- 
F148- 
F1BA- 
F1BD- 
F219- 
F2B3- 
F2BC- 
F2CC- 
F311- 
F355- 
F396- 
F400- 
F456- 
F467- 
F470- 
F479- 



F124 
F12A 
F13D 
F147 
F1B9 
F1BC 
F218 
■F2B2 
F2BB 
•F2C5 
F310 
F354 
F395 
F3FF 
■F455 
F466 
F46F 
F478 
F49F 



REQRWTS 

SETTRK 

CHKDRV 

DRVINDX 

READ16 

GOSERV 

RDADR1G 

WRITE16 

SERVICE 

WNIBL9 

PRENIB16 

P0STNIB16 

NIBL 

DNIBL 

SEEK 

HSWAIT 

ONTABLE 

OFFTABLE 

BLOCKIO 



Read/Write a disk track and sector 

Set slot dependent track location 

Check if disk motor is stopped 

Get index to drive number 

Read disk sector 

Interrupt service vector 

Read disk sector address field 

Write disk sector 

Interrupt servicer 

Write 7-bit nibbles to disk 

Pre-nibblize disk sector data 

Post-nibblize disk sector data 

6-bit to 7-bit nibble conversion table 

7-bit to 6-bit denibbleize conversion table 

Disk track seeker 

100 microsecond delayer 

Disk phase ON time table (in 100 microsecs) 

Disk phase OFF time table (in 100 microsecs) 

Read/write a disk block (2 sectors) 
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F4A0-F4A7 


SECTABL 


Block to sector conversion table 




F4A8-F4C4 


ANALOG 


Joystick read routine 




F4C5-F4CC 


RAMTBL 


RAM test bytes 




F4CD-F4ED 


CHPG 


Hardware component phrases (eg "RAM". "ROM", . . . ) 




F4EE-F523 


DIAGN 


ROM system power-up entry (calls RECON [F689]Wp 




F524-F531 


NXBYT 


Test RAM page (Zero Page) / 




F532-F545 


CNTWR 


Test RAM page 1 (Stack Page) ' 




F546-F574 


memsize 


Size the RAM gfflKi 

Display screen error line ("DIAGNOSTICS") *^ If 
Test RAM zero page & stack page lOf^l 
Test ROM hardware ' 




F575-F5B9 


ERRLP 




F5BA-F5E6 


zpgstktst 




F5E7-F60C 


ROMTST 




F60D-F63D 


VIATST 


Test VIA hardware 




F63E-F652 


ACIA 


Test ACIA hardware 




F653-F67A 


ATD 


Test A/0 hardware 




F67B-F688 


KEYPLUG 


Test keyboard plugin 




F689-F6C1 


RECON 


Reconfigure system (tests for Apple-1 key) 




F6C2-F6E5 


SEX 


System exerciser 




F5E6-F737 


USRENTRY 


Main RAM tester 




F738-F747 


STRWT 


Error message string writer 




F748-F77A 


RAM 


Determine size of RAM 




F77B-F783 


MESSERR 


Display error message 




F784-F7A0 


RAMSET 


Setup RAM 




F7A1-F7C8 


PTRINC 


Increment extended addressing pointer 




F7C9-F7F6 


RAHERR 


RAM error handler 




F7F7-F7FF 


RAMWT 


RAM write 




F800-F900 


RET1 


Nested RTS 'table* routine 




F901-F02B 


ENTRY 


SARA Monitor entry point 




F92C-F95D 


GETNUM 


Get number from user 




F92E-F96B 


TOSUB 


Execute Monitor command 




F96C-F97B 


CMDTAB 


Monitor command code table 




F97C-F98B 


CMDVEC 


Monitor command vector table (byte-long entries) 




F98C-F9AB 


NXTA4 


Increment 2 byte pointer 




F9AC-F9C1 


PRBYTE 


Output a byte to screen 




F9C2-F9C8 


PRBYCOL 


Output a byte followed by a colon 




F9C9-F9D3 


TST80WID 


Test for 80-column screen width 




F9D4-F9DE 


A1PC 


Test for new P.O. 




F9DF-FA06 


ASCII 1 


Store user ASCII string into memory 




FA07-FA25 


ASCII 


Fetch ASCII character from keyboard 




FA26-FA2B 


CRMON 


Dump line of hexadecimal bytes due to user CR 




FA2C-FA3A 


MOVE 


Move bytes around in memory 




FA3B-FA51 


VRFY 


Verify memory byte range 




FA52-FA77 


MISHATCH 


Output verify mismatch data line 




FA78-FA7A 


USER 


User control vector 




FA7B-FA82 


JUMP 


Transfer control to user routine 




FA83-FA90 


RWERROR 


Output error number 




FA91-FA99 


DEST 


Copy source pointer to destination pointer 




FA9A-FAB7 


SEP 


Test for seperator character in input line 




FAB8-FABF 


SETMOOE 


Setup user mode 




FAC0-FAE8 


READ 


Handle Monitor READ disk block command 




FAE9-FB20 


DUMP8 


Output line of memory bytes 




FB21-FB48 


DUMPASC 


Output line of memory bytes as ASCII 




FB49-FB4E 


C0L80 


Setup 80-column display mode 




FB4F-FB92 


C0L40 


Setup 40-column display mode 
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FB03-FBA3 


CONTRQL 


Handle user control character input 




FBA4-FBB6 


CURUP 


Handle cursor up motion 




FBB7-FBC8 


CURIGHT 


Handle cursor right motion 




FBC9-FB04 


DURDOWN 


Handle cursor down motion 




FB05-FBD8 


LSTBACK 


Handle backspace motion 




FBD9-FBF1 


CURLEFT 


Handle cursor left motion 




FBF2-FC04 


C0UT2 


Output character to screen 




FC05-FC24 


BASCALC1 


Compute character base address for screen output 




FC25-FC32 


COUT 


Output character to current output device 




FC33-FC35 


COUT1 


Character output vector 




FC36-FC51 


TSTBELL 


Handle BELL character output (beep speaker) 




FC52-FC5A 


LNFD 


Handle LINE FEED character output 




FC5B-FCQC 


SCROLL 


Scroll screen lines 




FC9D-FCAC 


DISPLAY 


Display character on 40-column screen 




FCAD-FCBA 


DSPL80 


Display character on 80-column screen 




FCBB-FC04 


NOTCR 


Handle non-control character output 




FCD5-FD0B 


GETLNZ 


Read user ASCII line from keyboard 




FDOC-FDOE 


RDKEY 


Read keyboard key input vector 




FD0F-FD47 


KEVIN 


Read raw keyboard key 




FD48-FD5F 


ESC3 


Handle ESC character cursor motion 




FD60-FD76 


RDCHAR 


Read keyboard character 




FD77-FD7E 


GOESC 


ESC key cursor motion handler 




FD7F-FD87 


ESCVECT 


ESC key editing command key code table 




FD88-FD97 


PICK 


Read character from current cursor location 




FD98-FDC5 


CLDSTART 


Cold boot system (initialize ROH globals) 




FDC6-FEAD 


SENENTR 


Load character generator RAH with bitmap 




FEAE-FEC4 


VRETRCE 


Wait/poll for CRT vertical retrace 




FEC5-FFB3 


CHRSET 


Character generator character bitmap table 




FFB4-FFB7 


HOOKS 


Output/Input vectors 




FFB8-FFBB 


VBOUNDS 


Screen dimension bounds (0,80,0,24) 




FFBC-FFBF 


NHIIRQ 


NHI request vector (JMP RECON [F689] RTI) 




FFCO-FFEF 


applecwrite 


Apple Computer, Inc. 1980 copyright phrase 




FFF0-FFF9 


ESCTABL 


ESC character table 




FFFA-FFFB 


NMI 


NHI vector [FFCA] 




FFFC-FFFD 


RESET 


RESET vector [F4EE] (Power-up Diagnostics) 




FFFE-FFFF 


IRG 


IRG vector [FFCD] 








The End 
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00001 




******rftftftf«tftf*tf*tf**t**tf*******tf*tf**#*tftf**tf*tf**tf*tftftftf** 




00001 




# APPLE /// ROM - DISK I/O ROUTINES 






00001 




t COPYRIGHT 1979 BY APPLE COMPUTER, INC. 






00001 




4***4********4****4*4444***************44************* 






00001 










00001 




. ABSOLUTE 






00001 




.PROC DISKIO 






00001 




. ORG 0F000 






00001 










F000I 




************************** 






F000| 




CRITICAL TIMING * 






F000I 




REQUIRES PAGE BOUND * 






F000I 




CONSIDERATIONS FOR * 






F000I 




CODE AND DATA * 






F000I 




CODE * 






F000I 




VIRTUALLY THE ENTIRE * 






F000| 




"WRITE" ROUTINE * 






F000I 




MUST NOT CROSS * 






F000| 




PAGE BOUNDARIES * 






F000I 




CRITICAL BRANCHES IN * 






F000I 




THE 'WRITE', 'READ', * 






F000I 




AND 'READ ADR' SUBRS * 






F000I 




WHICH MUST NOT CROSS * 






F000| 




PAGE BOUNDARIES ARE * 






F000| 




NOTED IN COMMENTS * 






F000I 




* 






F000I 




************************** 






F000I 




* 






F000I 




EQUATES * 






F000| 




* 






F000I 


0200 NBUF1 .EQU 0200 






F000| 


0302 NBUF2 .EQU 0302 ; (ZERO PAGE AT $300) 






F000| 










F000I 


0080 HRDERRS .EQU 80 






F000I 


00E0 DVMOT .EQU 0E0 






F000I 










F000I 


00B1 IBSLOT .EQU 81 






F000I 


0082 IBDRVN .EQU IBSLOT+1 






F000| 


008 3 IBTRK .EQU IBSLOT+2 






F000I 


0084 IBSECT .EQU IBSLOT+3 






F000I 


008 5 IBBUFP .EQU IBSLOT+4 ; S 5 






F000I 


008 7 IBCMD .EQU IBSLOT+6 






F000I 


008 8 


fBSTAT .EQU IBSLOT+7 






F000I 


008 9 IBSMOD .EQU IBSLOT+8 






F000I 


008 9 CSUM .EQU IBSMOD ; USED ALSO FOR ADDRESS HEADER CKSUM 






F000I 


008A 


[OBPDN .EQU IBSLOT+9 






F000I 


008B IMASK .EQU IBSLOT+0A 






F000I 


008C CURTRK .EQU IBSLOT+0B 






F000I 


008 5 DRVOTRK .EQU CURTRK-7 






F000I 




SLOT 4, DRIVE 1 






F000| 




SLOT 4, DRIVE 2 






F000I 




SLOT 5, DRIVE 1 






F000| 




SLOT 5, DRIVE 2 






F000| 




SLOT 6, DRIVE 1 






F000I 




SLOT 6, DRIVE 2 






F000I 


0093 RETRYCNT .EQU IBSLOT+1 2 






F000I 


0094 SEEKCNT .EQU IBSLOT+1 3 






F000I 


009B BUF .EQU IBSLOT+1 A 






F000I 


009F ENVTEMP .EQU IBSLOT+1E 






F000I 




IBSL0T+$1F NOT USED 






F000I 










F000I 




************************** 






F000I 




* 






F000I 




READADR * 






F000| 




* 






F000| 




************************** 






F000I 










F000I 


0095 ( 


:OUNT .EQU IBSLOT+1 4 


'MUST FIND' COUNT. 






F000| 


0095 


uAST .EQU IBSLOT+1 4 


'ODD BIT' NIBLS. 






F000| 


009 6 ( 


:KSUM .EQU IBSLOT+1 5 


CHECKSUM BYTE. 






F000I 


0097 ( 


:SSTV .EQU IBSLOT+1 6 


FOUR BYTES 






F000| 




CHECKSUM, SECTOR, TRACK, AND VOLUME. 






F000I 










F000I 




************************** 






F000I 




* 






F000I 




WRITE * 






F000I 




* 






F000I 




USES ALL NBUFS * 






F000I 




AND 32-BYTE * 






F000I 




DATA TABLE 'NIBL' * 






F000I 




* 






F000I 




************************** 






F000I 










F000I 




************************** 






F000| 




* 






F000I 




READ * 






F000I 




* 






F000I 




USES ALL NBUFS * 






F000| 




USES LAST 54 BYTES * 






F000| 




OF A CODE PAGE FOR * 
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F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 


0095 


F000 


009D 


F000 


009E 


F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 


009 9 


F000 


009A 


F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 


C080 


F000 


C081 


F000 


C08C 


F000 


C08D 


F000 


C08E 


F000 


C08F 


F000 


FFEF 


F000 


FFDF 


F000 


0080 


F000 


007F 


F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 


C088 


F000 


C08 9 


F000 


C08A 


F000 


C08B 


F000 


C081 


F000 


C080 


F000 


0097 


F000 


0097 


F000 


009 8 


F000 


009 9 


F000 


009 9 


F000 


009A 


F000 


0083 


F000 


0082 


F000 


0081 


F000 


0080 


F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 




F000 


A0 01 


F002 


A6 81 


F004 


84 94 


F006 


A9 05 


F00B 


65 8F 


F00A 


08 


F00B 


68 


F00C 


6A 


F00D 


6A 


F00E 


6A 


F00F 


6A 


F010 


85 SB 


F012 


AD DFFF 


F015 


85 9F 


F017 


20 2BF1 


F01A 


08 


F01B 


A5 85 


F01D 


85 9B 



SIGNIFICANT BYTES * 

OF DNIBL TABLE. * 

* 

************************** 

************************** 

* 

SEEK * 

* 

********** A* ********** AAA A 

TRKCNT .EQU COUNT 
PRIOR .EQU IBSLOT+1C 
TRKN .EQU IBSLOT+1D 

********************** AAA* 



k******************A* 



HALFTRACKS MOVED COUNT. 



MONTIMEL 
MONTIMEH 



********* 



.EQU 
.EQU 



CSSTV+2 
MONTIMEL+1 



MOTOR-ON TIME 
COUNTERS . 



************** 



DEVICE ADDRESS 
ASSIGNMENTS 



******** 



*************** 



PHASEOFF 


.EQU 


0C080 


STEPPER PHASE 


OFF. 


PHASEON 


.EQU 


0C081 


STEPPER PHASE 


ON. 


Q6L 


.EQU 


0C08C 


Q7L,Q6L=READ 




Q6H 


.EQU 


0C08D 


Q7L,Q6H=SENSE 


WPROT 


Q7L 


.EQU 


0C08E 


Q7H,Q6L=WRITE 




Q7H 


.EQU 


0C08F 


Q7H,Q6H=WRITE 


STORE 


INTERUPT 


.EQU 


0FFEF 






ENVIRON 


.EQU 


0FFDF 






ONE MEG 


.EQU 


80 






TWOMEG 


.EQU 


7F 







******************* 



EQUATES FOR RWTS AND BLOCK 



************** 



*************** 



MOTOROFF 


.EQU 


0C088 


MOTORON 


.EQU 


0C08 9 


DRVOEN 


.EQU 


0C08A 


DRV1EN 


.EQU 


0C08B 


PHASON 


.EQU 


0C081 


PHSOFF 


.EQU 


0C080 


TEMP 


.EQU 


CSSTV 


CSUM1 


.EQU 


TEMP 


SECT 


.EQU 


CSUM1+1 


TRACK 


.EQU 


SECT+1 


TRKN1 


.EQU 


TRACK 


VOLUME 


.EQU 


TRACK+1 


IBRERR 


.EQU 


HRDERRS+3 


IBDERR 


.EQU 


HRDERRS+2 


IBWPER 


.EQU 


HRDERRS+1 


IBNODRV 


.EQU 


HRDERRS 



; PUT ADDRESS INFO HERE 



************************* 



READ WRITE A 
TRACK AND SECTOR 



****************************** 



REGRWTS 



LDY 
LDX 
STY 
LDA 
STA 
PHP 
PLA 
ROR 
ROR 
ROR 
ROR 
STA 
LDA 
STA 
JSR 
PHP 
LDA 
STA 



#01 

IBSLOT 

SEEKCNT 

#005 

08F 



A 
A 
A 
A 

IMASK 
ENVIRON 
ENVTEMP 
CHKDRV 

IBBUFP 
BUF 



RETRY COUNT 

GET SLOT # FOR THIS OPERATION 

ONLY ONE RECALIBRATE PER CALL 



DETERMINE INTERRUPT STATUS 



GET INTERRUPT FLAG INTO BIT 7 



PRESERVE ENVIRONMENT 

SET ZERO FLAG IF MOTOR STOPPED 

SAVE TEST RESULTS 

MOVE OUT POINTER TO BUFFER INTO ZPAGE 
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F01F 


A5 86 


LDA IBBUFP+1 




F021 


85 9C 


STA BUF+1 






F023 


A9 E0 


LDA #DVMOT 






F025 


85 9A 


STA MONTIMEH 






F02 7 


A5 82 


LDA IBDRVN ; DETERMINE DRIVE ONE OR TWO 






F02 9 


C5 8A 


CMP IOBPDN ; SAME DRIVE USED BEFORE 






F02B 


85 8A 


STA IOBPDN ; SAVE IT FOR NEXT TIME 






F02D 


08 


PHP ; KEEP RESULTS OF COMPARE 






F02E 


6A 


ROR A ; GET DRIVE NUMBER INTO CARRY 






F02F 


BD 89C0 


LDA MOTORON.X ; TURN ON THE DRIVE 






F032 


9001 


BCC DRIVSEL ; BRANCH IF DRIVE 1 SELECTED 






F034 


E8 


INX ; SELECT DRIVE 2 






F035 


BD 8AC0 DRIVSEL LDA DRVOEN,X 






F038 


20 4CF3 


JSR SET1MEG ; INSURE ONE MEGAHERTZ OPERATION 






F03B 


28 


PLP ; WAS IT SAME DRIVE? 






F03C 


F00A 


BEQ OK 






F03E 


28 


PLP ; MUST INDICATE DRIVE OFF BY SETTING ZERO FLAG 






F03F 


A0 07 


LDY #07 ; DELAY 150 MS BEFORE STEPPING 






F041 


20 56F4 DRVWAIT JSR MSWAIT ; (ON RETURN A=0) 






F044 


88 


DEY 






F045 


D0FA 


BNE DRVWAIT 






F04 7 


08 


PHP ; NOW ZERO FLAG SET 






F04 8 


A5 83 OK LDA IBTRK ; GET DESTINATION TRACK 






F04A 


A6 81 


LDX IBSLOT ; RESTORE PROPER X (SLOT*16) 






F04C 


20 04F1 


JSR MYSEEK ,- AND GO TO IT 






F04F 




NOW AT THE DESIRED TRACK WAS THE MOTOR ON TO START WITH? 






F04F 


28 


PLP ; WAS MOTOR ON? 






F050 


D017 


BNE TRYTRK ; IF SO, DON'T DELAY, GET IT TODAY! 






F052 










F052 




MOTOR WAS OFF, WAIT FOR IT TO SPEED UP 






F052 










F0S2 


A0 12 MOTOF LDY #12 ; WAIT EXACTLY 100 US FOR EACH COUNT 






F054 


88 CONWAIT DEY ; IN MONTIME 






F055 


D0FD 


BNE CONWAIT 






F057 


E6 99 


INC MONTIMEL ; COUNT UP TO 0000 






F059 


D0F7 


BNE MOTOF 






F05B 


E6 9A 


INC MONTIMEH 






F05D 


30F3 


BMI MOTOF 






F05F 










F05F 




****************************** 






F05F 




MOTOR SHOULD BE UP TO SPEED 






F05F 




IF IT STILL LOOKS STOPPED THEN 






F05F 




THE DRIVE IS NOT PRESENT. 






F05F 










F05F 




****************************** 






F05F 










F05F 


20 2BF1 


JSR CHKDRV ; IS DRIVE PRESENT? 






F062 


D005 


BNE TRYTRK ; YES, CONTINUE 






F064 


A9 80 NODRIVERR LDA #IBNODRV ; NO, GET TELL EM NO DRIVE 






F06 6 


4C EAF0 


JMP HNDLERR 






F06 9 










F06 9 




NOW CHECK IF IT IS NOT THE FORMAT DISK COMMAND, 






F06 9 




LOCATE THE CORRECT SECTOR FOR THIS OPERATION 






F06 9 










F06 9 


A5 87 TRYTRK LDA IBCMD ,- GET COMMAND CODE # 






F06B 


F07 6 


BEQ ALLDONE ,- IF NULL COMMAND, GO HOME TO BED 






F06D 


c9 03 /i„r\ 


CMP #03 ; COMMAND IN RANGE? 






F06F 


B072 CWO 


BCS ALLDONE ; NO, DO NOTHING! 






F071 


6A V -' 


. ROR A ; SET CARRY-1 FOR READ, FOR WRITE 






F072 


B00B _^_ ^T 


J BCS TRYTRK2 ,- MUST PRENIBBLIZE FOR WRITE 






F074 


AD DFFF 1 Jr, \L 
2 9 7F » "^ ' i 
8D DFFF n^mjXA 
20 C4F2 **• «^ 


nA.^T" LDA ENVIRON 






F07 7 


1 ._L AND tTWOMEG ; SHIFT TO HIGH SPEED! 






F07 9 
F07C 


yCVyfi^ STA ENVIRON 
JSR PRENIB16 






F07F 


A0 7F TRYTRK2 LDY #7F ; ONLY 127 RETRIES OF ANY KIND 






F081 


84 93 


STY RETRYCNT 






F083 


A6 81 TRYADR LDX IBSLOT ; GET SLOT NUM INTO X-REG 






F085 


20 B9F1 


JSR RDADR16 ,- READ NEXT ADDRESS FIELD 






F088 


9022 


BCC RDRIGHT ; IF READ IS RIGHT, HURRAH! 






F08A 


20 AAF1 TRYADR2 JSR CHKINT ,- BRANCH TO CHECK FOR INTERRUPTS 






F08D 


C6 93 


DEC RETRYCNT ; ANOTHER MISTAKE ! ! 






F08F 


10F2 


BPL TRYADR ; WELL, LET IT GO THIS TIME 






F091 


C6 94 


DEC SEEKCNT ; ONLY RECALIBRATE ONCE! 






F093 


D053 


BNE DRVERR ; TRIED TO RECALIBRATE A SECOND TIME, ERROR! 






F095 


A5 8F 


LDA 08F ; ANOTHER MISTAKE!! 






F097 


30EA 


BMI TRYADR ,- WELL, LET IT GO THIS TIME 






F099 


A5 8C 


LDA CURTRK 






F09B 


48 


PHA ; SAVE TRACK WE REALLY WANT 






F09C 


A9 60 


LDA #60 ; RECALIBRATE ALL OVER AGAIN! ERROR! 






F09E 


20 25F1 


JSR SETTRK ; PRETEND TO BE ON TRACK 80 






F0A1 


A9 00 


LDA #00 






F0A3 


20 04F1 


JSR MYSEEK ; MOVE TO TRACK 00 






F0A6 


68 GOCAL1 PLA 






F0A7 


20 04F1 GOCAL JSR MYSEEK ; GO TO CORRECT TRACK THIS TIME! 






F0AA 


90D7 


BCC TRYADR ; LOOP BACK, TRY AGAIN ON THIS TRACK 






F0AC 










F0AC 




HAVE NOW READ AN ADDRESS FIELD CORRECTLY. 






F0AC 




• MAKE SURE THIS IS THE TRACK, SECTOR, AND VOLUME DESIRED. 






F0AC 










F0AC 


A4 99 


RDRIGHT LDY TRACK ; ON THE RIGHT TRACK? , 
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F0AE 


C4 8C 


CPY CURTRK 




F0B0 


F00E 


BEQ RTTRK ; IF SO, GOOD 






F0B2 










F0B2 




RECALIBRATING FROM THIS TRACK 






F0B2 










F0B2 


A5 8C 


LDA CURTRK ; PRESERVE DESTINATION TRACK 






F0B4 


48 


PHA 






F0B5 


98 


TYA 






FOB 6 


0A 


ASL A 






F0B7 


20 25F1 


JSR SETTRK 






F0BA 


68 


PLA 






F0BB 


20 04F1 


JSR MY SEEK 






F0BE 


90CA 


BCC TRYADR2 






F0C0 


A5 9A RTTRK LDA VOLUME ; GET ACTUAL VOLUME HERE 






F0C2 


85 89 


STA IBSMOD ; TELL OPSYS WHAT VOLUME WAS THERE 






F0C4 


A5 98 CORRECTVOL LDA SECT ; CHECK IF THIS IS THE RIGHT SECTOR 






F0C6 


C5 84 


CMP IB SECT 






F0C8 


D0C0 


BNE TRYADR2 


NO, TRY ANOTHER SECTOR 






F0CA 


A5 87 


LDA IBCMD 


READ OR WRITE? 






F0CC 


4A 


LSR A 


THE CARRY WILL TELL 






F0CD 


902A 


BCC WRIT 


CARRY WAS SET FOR READ OPERATION, 






F0CF 


20 48F1 


JSR READ 16 


CLEARED FOR WRITE 






F0D2 


B0B6 


BCS TRYADR2 


CARRY SET UPON RETURN IF BAD READ 






F0D4 


AD DFFF 


LDA ENVIRON 






F0D7 


2 9 7F 


AND #TWOMEG 






F0D9 


8D DFFF 


STA ENVIRON ; SET TWO MEGAHERTZ 






F0DC 


20 0FF3 


JSR POSTNIB16 ; DO PARTIAL POSTNIBBLE CONVERSION 






F0DF 


A6 81 


LDX IBSLOT ; RESTORE SLOTNUM INTO X 






F0E1 


B0A7 


BCS TRYADR2 ; CHECKSUM ERROR 






F0E3 


1 8 ALLDONE CLC 






F0E4 


A9 00 


LDA #00 


NO ERROR 






F0E6 


9003 


BCC ALDONE1 


SKIP OVER NEXT BYTE WITH BIT OPCODE 






F0E8 


A 9 82 DRVERR LDA #IBDERR 


BAD DRIVE 






F0EA 


38 HNDLERR SEC 


INDICATE AN ERROR 






F0EB 


85 88 ALDONE1 STA IBSTAT 


GIVE HIM ERROR 






F0ED 


BD 88C0 


LDA MOTOROFF.X 


TURN IT OFF 






F0F0 


20 AAF1 


JSR CHKINT 


BRANCH TO CHECK FOR INTERRUPTS 






F0F3 


A5 9F 


LDA ENVTEMP 


RESTORE ORIGINAL ENVIRONMENT 






F0F5 


8D DFFF 


STA ENVIRON 






F0F8 


60 


RTS 






F0F9 










F0F9 


20 16F2 WRIT JSR WRITE16 


WRITE NYBBLES NOW 






F0FC 


90E5 


BCC ALLDONE 


IF NO ERRORS 






F0FE 


A9 81 


LDA #IBWPER 


DISK IS WRITE PROTECTED!! 






F100 


50E8 


BVC HNDLERR 


TAKEN IF TRUELY WRITE PROTECT ERROR 






F102 


D08 6 


BNE TRYADR2 


OTHERWISE ASSUME AN INTERRUPT MESSED THINGS UP 






F104 










F104 




THIS IS THE 'SEEK 1 ROUTINE 






F104 




SEEKS TRACK 'N' IN SLOT #X/$10 






F104 




IF DRIVENO IS NEGATIVE, ON DRIVE 






F104 




IF DRIVENO IS POSITIVE, ON DRIVE 1 






F104 










F104 


0A 1 


1YSEEK ASL A 


• ASSUME TWO PHASE STEPPER. 






F105 


85 99 


5EEK1 STA TRKN1 


SAVE DESTINATION TRACK (*2) 






F107 


20 18F1 


JSR ALLOFF 


TURN ALL PHASES OFF TO BE SURE. 






F10A 


20 3EF1 


JSR DRVINDX 


• GET INDEX TO PREVIOUS TRACK FOR CURRENT DRIVE 






F10D 


B5 85 


LDA DRVOTRK,X 






F10F 


85 8C 


STA CURTRK ; THIS IS WHERE I AM 






Fill 


A5 99 


LDA TRKN1 ; AND WHERE I'M GOING TO 






F113 


95 85 


STA DRVOTRK,X 






F115 


20 00F4 ( 


30SEEK JSR SEEK 


■ GO THERE! 






F118 


A0 03 1 


ALLOFF LDY #03 


- TURN OFF ALL PHASES BEFORE RETURNING 






F11A 


98 t 


MOFF TYA 


■ (SEND PHASE IN ACC.) 






F11B 


20 4AF4 


JSR CLRPHASE 


■ CARRY IS CLEAR, PHASES SHOULD BE TURNED OFF 






F11E 


88 


DEY 






F11F 


10F9 


BPL NXOFF 






F121 


4 6 8C 


LSR CURTRK ; DIVIDE BACK NOW 






F123 


18 


CLC 






F124 


60 


RTS 






F125 










F125 




THIS SUBROUTINE SETS THE SLOT DEPENDENT TRACK 






F125 




LOCATION 






F125 










F125 


20 3EF1 


SETTRK JSR DRVINDX ; GET INDEX TO DRIVE NUMBER 






F128 


95 85 


STA DRVOTRK,X 






F12A 


60 


RTS 






F12B 










F12B 




***************************** 






F12B 










F12B 




• SUBR TO TELL IF MOTOR IS STOPPED 






F12B 










F12B 




■ IF MOTOR IS STOPPED, CONTROLLER'S 






F12B 




■ SHIFT REG WILL NOT BE CHANGING. 






F12B 










F12B 




■ RETURN Y=0 AND ZERO FLAG SET IF IT IS STOPPED. 






F12B 










F12B 




■ ***************************** 






F12B 










F12B 


A0 00 


3HKDRV LDY #00 ; INIT LOOP COUNTER 






F12D 


BD 8CC0 


ZHKDRVl LDA Q6L.X ; READ THE SHIFT REG 
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F130 


20 3DF1 


JSR CKDRTS ; DELAY 




F133 


48 


PHA 






F134 


68 


PLA 






F135 


DD 8CC0 


CMP Q6L,X 


HAS SHIFT REG CHANGED? 






F138 


D003 


BNE CKDRTS 


YES, MOTOR IS MOVING 






F13A 


88 


DEY 


NO, DEC RETRY COUNTER 






F13B 


D0F0 


BNE CHKDRV1 


AND TRY 256 TIMES 






F13D 


60 CKDRTS RTS 


THEN RETURN 






F13E 










F13E 


48 DRVINDX PHA ; PRESERVE ACC. 






F13F 


8A 


TXA ; GET SLOT <*$10) /8 






F140 


4A 


LSR A 






F141 


4A 


LSR A 






F142 


4A 


LSR A 






F143 


05 82 


ORA IBDRVN 


FOR DRIVE OR 1 






F145 


AA 


TAX 


INTO X FOR INDEX TO TABLE 






F146 


68 


PLA 


RESTORE ACC. 






F147 


60 


RTS 






F148 










F148 




***************************** 






F148 




,t i M 






F148 




NOTE: FORMATTING ROUTINES 1 .1 ^N«,{>, 
NOTE INCLUDED FOR SOS 7^. SAOkUi 1 1 !<*■ 
***************************** . ri»f *r 
************************* 1 1 A «Vv. 1 fl^- ^^ 






F148 
F148 








F148 
F148 








F148 








F148 




A / vv " "* 






F148 




READ SUBROUTINE * 






F148 




(16-SECTOR FORMAT) * 






F148 




* 






F148 




************************* 






F148 




* 






F148 




READS ENCODED BYTES * 






F148 




INTO NBUF1 AND NBUF2 » 






F148 




* 






F148 




FIRST READS NBUF2 « 






F148 




HIGH TO LOW, * 






F148 




THEN READS NBUF1 * 






F148 




LOW TO HIGH. * 






F148 




* 






F148 




ON ENTRY * 






F148 




* 






F148 




X-REG: SLOTNUM * 






F148 




TIMES $10. * 






F148 




* 






F148 




READ MODE (06L, Q7L * 






F148 




* 






F148 




ON EXIT * 






F148 




* 






F148 




CARRY SET IF ERROR « 






F148 




* 






F148 




IF NO ERROR: * 






F148 




A-REG HOLDS $AA. * 






F148 




X-REG UNCHANGED. * 






F148 




Y-REG HOLDS $00. * 






F148 




CARRY CLEAR. * 






F148 




CAUTION * 






F148 




* 






F148 




OBSERVE * 






F148 




■NO PAGE CROSS" * 






F148 




WARNINGS ON * 






F148 




SOME BRANCHES ! ! * 






F148 




* 






F148 




ASSUMES * 






F148 




* 






F148 




1 USEC CYCLE TIME * 






F148 




* 






F148 




************************* 






F148 










F148 


A0 20 I 


IEAD16 LDY #20 


'MUST FIND' COUNT. 






F14A 


88 I 


*SYNC DEY 


• IF CAN'T FIND MARKS. 






F14B 


F06A 


BEQ RDERR 


• THEN EXIT WITH CARRY SET 






F14D 


BD 8CC0 I 


*D1 LDA Q6L,X 


• READ NIBL. 






F150 


10FB 


BPL RD1 


• «*« NO PAGE CROSS! **« 






F152 


4 9 D5 I 


}SYNC1 EOR #0D5 


• DATA MARK1? 






F154 


D0F4 


BNE RSYNC 


• LOOP IF NOT. 






F156 


EA 


NOP 


• DELAY BETWEEN NIBLS. 






F157 


BD 8CC0 


*D2 LDA Q6L,X 






F15A 


10FB 


BPL RD2 


• **« NO PAGE CROSS! *** 






F15C 


C9 AA 


CMP #0AA 


■ DATA MARK 2? 






F15E 


D0F2 


BNE RSYNC1 


■ (IF NOT, IS IT DM1?) 






F160 


A0 55 


LDY #055 


• INIT NBUF2 INDEX. 






F162 




( ADDED NIBL DELAY) 






F162 


EA 


NOP ; DELAY BETWEEN NIBLS. 






F163 


BD 8CC0 


*D3 LDA Q6L,X 






F166 


10FB 


BPL RD3 ; *** NO PAGE CROSS! *** 






F168 


C9 AD 


CMP #0AD ; DATA MARK 3? 






F16A 


D0E6 


BNE RSYNC1 ; (IF NOT, IS IT DM1?) 






F16C 




(CARRY SET IF DM3! ) j 












k 


Page 0083 of 0170 j 



t 






Apple Computer Inc. Patent : 4_383_296 












f 




\ 






10/31/89 9:56 


HD:Apple ///:ROM - Disk I/O Page 6 




F16C 


EA 


NOP ; DELAY BETWEEN NIBLS. 




F16D 


EA 


NOP ; DELAY BETWEEN NIBLS. 






F16E 


BD 8CC0 RD4 LDA Q6L t X 






F171 


10FB 


BPL RD4 ; *** NO PAGE CROSS! *** 






F173 


99 0203 


STA NBUF2,Y ; STORE BYTES DIRECTLY 






F176 


AD EFFF 


LDA INTERUPT ; POLL INTERRUPT LINE 






F179 


05 8B 


ORA IMASK ; (THIS MAY BE USED TO INVALIDATE POLL) 






F17B 


1037 


BPL GOSERV 






F17D 


88 


DEY ; INDEX TO NEXT 






F17E 


10EE 


BPL RD4 






F180 


C8 RD5 INY ; (FIRST TIME Y=0) 






F181 


BD 8CC0 RD5A LDA Q6L,X ; GET ENCODED BYTES OF NBUF1 






F184 


10FB 


BPL RD5A 






F186 


9 9 0002 


STA NBUF1,Y 






F189 


AD EFFF 


LDA INTERUPT ; POLL INTERRUPT LINE 






F18C 


05 8B 


ORA IMASK ; (THIS MAY BE USED TO INVALIDATE POLL) 






F18E 


1024 


BPL GOSERV 






F190 


C0 E4 


CPY #0E4 ; WITHIN 1 MS OF COMPLETION? 






F192 


D0EC 


BNE RD5 






F194 


C8 


INY 






F195 


BD 8CC0 RD6 LDA Q6L,X ; NO POLL FROM NOW ON 






F198 


10FB 


BPL RD6 






F19A 


9 9 0002 


STA NBUF1,Y 






F19D 


C8 


INY ; FINISH OUT NBUF1 PAGE 






F19E 


D0F5 


BNE RD6 






F1A0 


BD 8CC0 RDCKSDM LDA Q6L,X ; GET CHECKSUM BYTE. 






F1A3 


10FB 


BPL RDCKSUM 






F1A5 


85 96 


STA CKSUM 






F1A7 


20 01F2 


JSR RDA6 ; CHECK BIT SLIP MARKS 






F1AA 










F1AA 




CHECK FOR INTERRUPTS 






F1AA 










F1AA 


24 8B CHKINT BIT IMASK ; SHOULD INTERRUPTS BE ALLOWED? 






F1AC 


1004 


BPL $010 ; YES, ALLOW THEM. 






F1AE 


24 8F 


BIT 08F 






F1B0 


1001 


BPL $020 






F1B2 


58 $010 CLI 






F1B3 


60 $020 RTS 






F1B4 










F1B4 


20 AAF2 GOSERV JSR SERVICE ; GO TO SERVICE INTERRUPT 






F1B7 


38 RDERR SEC 






F1B8 


60 


RTS 






F1B9 










F1B9 




*************************** 






F1B9 




* 






F1B9 




READ ADDRESS FIELD * 






F1B9 




SUBROUTINE * 






F1B9 




(16-SECTOR FORMAT) * 






F1B9 




* 






F1B9 




*************************** 






F1B9 




* 






F1B9 




READS VOLUME, TRACK * 






F1B9 




AND SECTOR * 






F1B9 




* 






F1B9 




ON ENTRY * 






F1B9 




* 






F1B9 




XREG: SLOTNUM TIMES $10 * 






F1B9 




* 






F1B9 




READ MODE (Q6L, Q7L) * 






F1B9 




* 






F1B9 




ON EXIT * 






F1B9 




* 






F1B9 




CARRY SET IF ERROR * 






F1B9 




* 






F1B9 




IF NO ERROR: * 






F1B9 




A-REG HOLDS $AA. * 






F1B9 




Y-REG HOLDS $00. * 






F1B9 




X-REG UNCHANGED. * 






F1B9 




CARRY CLEAR. * 






F1B9 




* 






F1B9 




CSSTV HOLDS CHKSUM, * 






F1B9 




SECTOR, TRACK, AND * 






F1B9 




VOLUME READ. * 






F1B9 




* 






F1B9 




USES TEMPS COUNT, * 






F1B9 




LAST, CSUM, AND * 






F1B9 




4 BYTES AT CSSTV. * 






F1B9 




* 






F1B9 




EXPECTS » 






F1B9 




* 






F1B9 




ORIGINAL 10-SECTOR * 






F1B9 




NORMAL DENSITY NIBLS * 






F1B9 




(4-BIT) , ODD BITS, * 






F1B9 




THEN EVEN * 






F1B9 




* 






F1B9 




CAUTION * 






F1B9 




* 






F1B9 




OBSERVE * 






F1B9 




■NO PAGE CROSS' * 






F1B9 




WARNINGS ON * J 
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F1B9 




F1B9 




F1B9 




F1B9 




F1B9 




F1B9 




F1B9 




F1B9 




F1B9 


A0 FC 


F1BB 


84 95 


F1BD 


C8 


F1BE 


D004 


F1C0 


E6 95 


F1C2 


F0F3 


F1C4 


BD 8CC0 


F1C7 


10FB 


F1C9 


C9 D5 


F1CB 


D0F0 


F1CD 


EA 


F1CE 


BD 8CC0 


F1D1 


10FB 


F1D3 


C9 AA 


F1D5 


D0F2 


F1D7 


A0 03 


F1D9 




F1D9 


BD 8CC0 


F1DC 


10FB 


FIDE 


C9 96 


F1E0 


D0E7 


F1E2 




F1E2 


78 


F1E3 


A9 00 


F1E5 


85 89 


F1E7 


BD 8CC0 


F1EA 


10FB 


F1EC 


2A 


F1ED 


85 95 


FIEF 


BD 8CC0 


F1F2 


10FB 


F1F4 


25 95 


F1F6 


9 9 97 00 


F1F9 


45 89 


F1FB 


88 


F1FC 


10E7 


FIFE 


A8 


F1FF 


D0B6 


F201 


BD 8CC0 


F204 


10FB 


F206 


C9 DE 


F208 


D0AD 


F20A 


EA 


F20B 


BD 8CC0 


F20E 


10FB 


F210 


C9 AA 


F212 


D0A3 


F214 


18 


F215 


60 


F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 




F216 





SOME BRANCHES ! ! * 




ASSUMES 




1 


USEC CYCLE 


TIME * 


• *************************** 


RDADR1 6 


LDY 


#0FC 




STY 


COUNT 


RDASYN 


INY 






BNE 


RDA1 




INC 


COUNT 




BEQ 


RDERR 


RDA1 


LDA 


Q6L,X 




BPL 


RDA1 


RDASN1 


CMP 


#0D5 




BNE 


RDASYN 




NOP 




RDA2 


LDA 


Q6L,X 




BPL 


RDA2 




CMP 


#0AA 




BNE 


RDASN1 




LDY 


#03 

(ADDED NIBL 


RDA3 


LDA 


Q6L,X 




BPL 


RDA3 




CMP 


#96 




BNE 


RDASN1 


; 


(LEAVES CARRY SET!) 




SEI 






LDA 


#00 


RDAFLD 


STA 


CSUM 


RDA4 


LDA 


Q6L,X 




BPL 


RDA4 




ROL 


A 




STA 


LAST 


RDA5 


LDA 


Q6L,X 




BPL 


RDA5 




AND 


LAST 




STA 


CSSTV r Y 




EOR 


CSUM 




DEY 






BPL 


RDAFLD 




TAY 






BNE 


RDERR 


RDA6 


LDA 


Q6L,X 




BPL 


RDA6 




CMP 


#0DE 




BNE 


RDERR 




NOP 




RDA7 


LDA 


Q6L,X 




BPL 


RDA7 




CMP 


#0AA 




BNE 


RDERR 


RDEXIT 


CLC 




WEXIT 


RTS 





■MUST FIND' COUNT. 

LOW ORDER OF COUNT 
<2K NIBLS TO FIND 

ADR MARK, ELSE ERR) 

READ NIBL. 

*** NO PAGE CROSS! *** 

ADR MARK 1? 
(LOOP IF NOT) 

ADDED NIBL DELAY 



*** NO PAGE CROSS! *** 
ADR MARK 2? 
(IF NOT, IS IT AMI?) 
INDEX FOR 4-BYTE READ 

DELAY) 

*** NO PAGE CROSS! *** 
ADR MARK 3? 
(IF NOT IS IT AMI?) 

DISABLE INTERRUPT SYSTEM 
INIT CHECKSUM 

READ 'ODD BIT' NIBBL 
*** NO PAGE CROSS! *** 
ALIGN ODD BITS, 1" INTO LSB 
(SAVE THEM) 
READ 'EVEN BIT" NIBL 
*** NO PAGE CROSS *** 
MERGE ODD AND EVEN BITS 
STORE DATA BYTE 



LOOP ON 4 DATA BYTES. 
IF FINAL CHECKSUM 
NONZERO, THEN ERROR 
FIRST BIT SLIP NIBBL 
*** NO PAGE CROSS! *** 

ERROR IF NONMATCH 

DELAY 

SECOND BIT-SLIP NIBL 

*** NO PAGE CROSS! *** 

ERROR IF NOMATCH 
CLEAR CARRY ON 
NORMAL READ EXITS. 



*********************** 

* 

WRITE SUBR * 

(16-SECTOR FORMAT) * 

* 

*********************** 

* 

WRITES DATA FROM * 

NBUF1 AND NBUF2 * 

A 

FIRST NBUF2, * 

HIGH TO LOW. * 

THEN NBUF1, * 

LOW TO HIGH • 

* 

ON ENTRY * 

* 

X-REG SLOTNUM * 
TIMES $10 * 



ON EXIT 

CARRY SET IF ERROR. 
(W PROT VIOLATION) 

IF NO ERROR: 

A- REG UNCERTAIN. 
X-REG UNCHANGED. 
Y-REG HOLDS $00. 
CARRY CLEAR. 



Page 0085 of 0170 



t 






Apple 


Computer Inc. Patent : 4_383_296 
















10/31/89 9:56 




HD: Apple ///:ROM - Disk I/O Page 8 




F216 






* 






F216 




ASSUMES • 








F216 






* 








F216 




1 USEC 


CYCLE TIME * 








F216 






A 








F216 




*********************** 








F216 














F216 


38 WRITE16 


SEC 


ANTICIPATE WPROT ERR. 






F217 


B8 




CLV 


TO INDICATE WRITE PROTECT ERROR INSTEAD OF 






F218 








INTERRUPT 






F218 


BD 8DC0 




LDA Q6H,X 








F21B 


BD 8EC0 




LDA Q7L,X 


SENSE WPROT FLAG. 






F21E 


30F5 




BMI WEXIT 


BRANCH IF WRITE PROTECTED 






F220 


A 9 FF WRIT1 


LDA #0FF 


SYNC DATA. 






F222 


9D 8FC0 




STA Q7H,X 


(5) GOTO WRITE MODE 






F225 


ID 8CC0 




ORA Q6L,X 


(4) 






F228 


A0 04 




LDY #04 


(2) FOR FIVE NIBLS. 






F22A 


EA 




NOP 


(2) 






F22B 


48 




PHA 


(41 






F22C 


68 




PLA 


(3) 






F22D 


4 8 WSYNC 


PHA 


(4) EXACT TIMING 






F22E 


68 




PLA 


(3) 






F22F 


20 BBF2 




JSR WNIBL7 


(13,9,6) WRITE SYNC 






F232 


88 




DEY 


(2) 






F233 


D0F8 




BNE WSYNC 


(2*) MUST NOT CROSS PAGE! 






F235 


A9 D5 




LDA #0D5 


(2) 1ST DATA MARK 






F237 


20 BAF2 




JSR WNIBL9 


(15,9,6) 






F23A 


A9 AA 




LDA #ZAA 


(2) 2ND DATA MARK 






F23C 


20 BAF2 




JSR WNIBL9 


(15,9,6) 






F23F 


A9 AD 




LDA #0AD 


(2) 3RD DATA MARK 






F241 


20 BAF2 




JSR WNIBL9 


(15,9,6) 






F244 


A0 55 




LDY #55 


(2) NBUF2 INDEX 






F246 


EA 




NOP 


(2) FOR TIMING 






F247 


EA 




NOP 


(2) 






F248 


EA 




NOP 


(2) 






F249 


D008 




BNE VRYFRST 


(3) BRANCH ALWAYS 






F24B 


AD EFFF WINTHPT 


LDA INTERUPT 


(4) POLL INTERRUPT LINE 






F24E 


05 8B 




ORA IMASK 


(3) 






F25Z 


38 




SEC 


(2) 






F251 


1057 




BPL SERVICE 


(2) BRANCH IF INTERRUPT HAS OCCURED 






F253 


3000 VRYFRST 


BMI WRTFRST 


(3) FOR TIMING. 






F255 


B9 0203 WRTFRST 


LDA NBUF2,Y 


(4) 






F258 


9D 8DC0 




STA Q.6H,X 


(5) STORE ENCODED BYTE 






F25B 


BD 8CC0 




LDA Q6L,X 


(4) TIME MUST = 32 US PER BYTE! 






F25E 


88 




DEY 


(2) 






F25F 


10EA 




BPL WINTRPT 


(3) (2 IF BRANCH NOT TAKEN) 






F261 


98 




TYA 


(2) INSURE NO INTERRUPT THIS BYTE 






F262 


3003 




BMI WMIDLE 


(3) BRANCH ALWAYS. 






F264 


AD EFFF WNTRPT1 


LDA INTERUPT 


(4) POLL INTERRUPT LINE 






F267 


05 8B WMIDLE 


ORA IMASK 


(3) 






F269 


38 




SEC 


(2) 






F26A 


3002 




BMI WDATA2 


(3) BRANCH IF NO INTERRUPT 






F26C 


103C 




BPL SERVICE 


GO SERVICE INTERRUPT. 






F26E 


C8 WDATA2 


INY 


(2) 






F26F 


B9 0002 




LDA NBUF1.Y 


(4) 






F272 


9D 8DC0 




STA Q6H,X 


(5) STORE ENCODED BYTE 






F275 


BD 8CC0 




LDA Q6L,X 


(4) 






F278 


C0 E4 




CPY #0E4 


(2) WITHIN 1 MS OF COMPLETION? 






F27A 


D0E8 




BNE WNTRPT1 


(3) (2) NO KEEP WRITTING AND POLLING. 






F27C 


EA 




NOP 


(2) 






F27D 


C8 




INY 


(2) 






F27E 


EA WDATA3 


NOP 


(2) 






F27F 


EA 




NOP 


(2) 






F280 


48 




PHA 


(4) 






F281 


68 




PLA 


(3) 






F282 


B9 0002 




LDA NBUF1,Y 


(4) WRITE LAST OF ENCODED BYTES 






F285 


9D 8DC0 




STA Q6H,X 


(5) WITHOUT POLLING INTERRUPTS. 






F288 


BD 8CC0 




LDA Q6L,X 


(4) 






F28B 


A5 96 




LDA CKSUM 


(3) NORMALLY FOR TIMING 






F28D 


C8 




INY 


(2) 






F28E 


D0EE 




BNE WDATA3 


(3) (2) 






F290 


F000 




BEQ WRCKSUM 


(3) BRANCH ALWAYS 






F292 


20 BBF2 WRCKSUM 


JSR WNIBL7 


(13,9,61 GO WRITE CHECK SUM!! 






F295 


48 




PHA 


(3) 






F296 


68 




PLA 


(4) 






F297 


B9 C0F3 WRBITSLMK 


LDA BITSLIPMK, Y 


(4) LOAD BIT SLIP MARK 






F29A 


20 BDF2 




JSR WNIBL 


(6,9,6) 






F29D 


C8 




INY 


(2) 






F29E 


C0 04 




CPY #04 


(2) 






F2A0 


D0F5 




BNE WRBITSLMK 


(2) (3) 






F2A2 


18 




CLC 


(2) 






F2A3 


BD 8EC0 NOWRITE 


LDA Q7L,X 


OUT OF WRITE MODE. 






F2A6 


BD 8CC0 




LDA Q6L,X 


TO READ MODE. 






F2A9 


60 




RTS 


RETURN FROM WRITE. 






F2AA 














F2AA 


2C 54F3 


SERVICE 


BIT SEV 


SET VFLAG TO INDICATE INTERRUPT 






F2AD 


20 A3F2 




JSR NOWRITE 


TAKE IT OUT OF WRITE MODE! 






F2B0 


A5 8F 




LDA 08F 








F2B2 


1002 




BPL $010 








F2B4 


85 8B 




STA IMASK 


J 
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F2B6 


C6 8F $010 DEC 08F 




F2B8 


58 


CLI ; COULD NOT HAVE GOT HERE WITHOUT CLI OK 






F2B9 


60 


RTS 






F2BA 










F2BA 




**************************** 






F2BA 




* 






F2BA 




7-BIT NIBL WRITE SUBRS * 






F2BA 




* 






F2BA 




A-REG OR'D PRIOR EXIT * 






F2BA 




CARRY CLEARED * 






F2BA 




* 






F2BA 




**************************** 






F2BA 










F2BA 


18 WNIBL9 CLC 


(2) 9 CYCLES, THEN WRITE 






F2BB 


4 8 WNIBL7 PHA 


(3) 7 CYCLES, THEN WRITE 






F2BC 


68 


PLA 


(4) 






F2BD 


9D 8DC0 WNIBL STA Q6H,X , 


(5) NIBL WRITE SUB 






F2C0 


ID 8CC0 


ORA Q6L.X 


(4) CLOBBERS ACC. NOT CARRY 






F2C3 


60 


RTS 






F2C4 










F2C4 




**************************** 






F2C4 




* 






F2C4 




PRENIBILIZE SUBR * 






F2C4 




(16-SECTOR FORMAT) * 






F2C4 




* 






F2C4 




**************************** 






F2C4 




* 






F2C4 




CONVERTS 256 BYTES OF * 






F2C4 




USER DATA IN (BUF) INTO * 






F2C4 




ENCODED BYTES TO BE * 






F2C4 




WRITTEN DIRECTLY TO DISK * 






F2C4 




ENCODED CHECK SUM IN * 






F2C4 




ZERO PAGE 'CKSUM" * 






F2C4 




* 






F2C4 




ON ENTRY * 






F2C4 




* 






F2C4 




BUF IS 2-BYTE POINTER * 






F2C4 




TO 256 BYTES OF USER * 






F2C4 




DATA . * 






F2C4 




* 






F2C4 




A-REG CHECK SUM. * 






F2C4 




X-REG UNCERTAIN « 






F2C4 




Y-REG HOLDS 0. * 






F2C4 




CARRY SET. * 






F2C4 




* 






F2C4 




**************************** 






F2C4 










F2C4 


A2 02 PRENIB16 LDX #02 ; START NBUF2 INDEX. 






F2C6 


A0 00 


LDY #00 ; START USER BUF INDEX. 






F2C8 


88 PRENIB1 DEY ; NEXT USER BYTE 






F2C9 


Bl 9B 


LDA (BUF) , Y 






F2CB 


4A 


LSR A 


SHIFT TWO BITS OF 






F2CC 


3E 0103 


ROL NBUF2-1,X 


CURRENT USER BYTE 






F2CF 


4A 


LSR A 


INTO CURRENT NBUF2 






F2D0 


3E 0103 


ROL NBUF2-1,X 


BYTE. 






F2D3 


99 0102 


STA NBUF1+1,Y 


(6 BITS LEFT) . 






F2D6 


E8 


I NX 


FROM TO $55 






F2D7 


E0 56 


CPX #56 






F2D9 


90ED 


BCC PRENIB1 


BR IF NO WRAPAROUND 






F2DB 


A2 00 


LDX #00 


RESET NBUF2 INDEX 






F2DD 


98 


TYA 


USER BUF INDEX 






F2DE 


D0E8 


BNE PRENIB1 


(DONE IF ZERO) 






F2E0 


A0 56 


LDY #5 6 


(ACC=0 FOR CHECK SUM) 






F2E2 


5 9 0003 I 


3 RENIB3 EOR NBUF2-2,Y 


COMBINE WITH PREVIOUS 






F2E5 


2 9 3F I 


=RENIB2 AND #03F 


STRIP GARBAGE BITS 






F2E7 


AA 


TAX 


TO FORM RUNNING CHECK SUM 






F2E8 


BD 55F3 


LDA NIBL,X 


GET ENCODED EQUIV. 






F2EB 


99 0103 


STA NBUF2-1,Y 


REPLACE PREVIOUS 






F2EE 


B9 0003 


LDA NBUF2-2,Y 


RESTORE ACTUAL PREVIOUS 






F2F1 


88 


DEY 






F2F2 


D0EE 


BNE PRENIB3 ; LOOP UNTIL ALL OF NBUF2 IS CONVERTED. 






F2F4 


2 9 3F 


AND #3F 






F2F6 


59 0102 


:>RENIB4 EOR NBUF1 + 1,Y 


NOW DO THE SAME FOR 






F2F9 


AA 


TAX 


NIBBLE BUFFER 1 






F2FA 


BD 55F3 


LDA NIBL,X 


TO DO ANY BACK TRACKING (NBUF1-1) 






F2FD 


9 9 0002 


STA NBUF1,Y 






F300 


B9 0102 


LDA NBUF1+1,Y ; RECOVER THAT WHICH IS NOW 'PREVIOUS" 






F303 


C8 


INY 






F304 


D0F0 


BNE PRENIB4 






F306 


AA 


TAX ; USE LAST AS CHECK SUM 






F307 


BD 55F3 


LDA NIBL,X 






F30A 


85 96 


STA CKSUM 






F30C 


4C 4CF3 


JMP SET1MEG ; ALL DONE. 






F30F 










F30F 




.************************** 






F30F 




* 






F30F 




POSTNIBLIZE SUBR * 






F30F 




16-SECTOR FORMAT * 






F30F 




* 






F30F 




-A************************* 










J 
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F30F 


























F30F 


38 












POSTNIB16 SEC 










F310 


A0 


55 












LDY 


#55 




; FIRST CONVERT TO 6 BIT NIBBLES 




F312 


A9 


00 












LDA 


#00 




; I NIT CHECK SUM 




F314 


BE 


0203 








PNIBL1 LDX 


NBUF2,Y 




; GET ENCODED BYTE 




F317 


5D 


00F3 










EOR 


DNIBL,X 








F31A 


3030 












BMI 


SET1MEG 




; SET 1 MHZ 




F31C 


99 


0203 










STA 


NBDF2,Y 




; REPLACE WITH 6 BIT EQUIV. 




F31F 


88 














DEY 










F320 


10A6 












BPL 


PRENIB1 




; LOOP UNTIL DONE WITH NIBBLE BUFFER 2 




F322 


C8 














INY 






,- NOW Y=0 




F323 


BE 


0002 








PNIBL2 LDX 


NBUF1,Y 




; DO THE SAME WITH 




F326 


5D 


00F3 










EOR 


DNIBL,X 








F329 


99 


0002 










STA 


NBUF1,Y 




,- NIBBLE BUFFER 1 




F32C 


C8 














INY 






; DO ALL 25 6 BYTES 




F32D 


D0F4 












BNE 


PNIBL2 








F32F 


A6 


96 












LDX 


CKSUM 




,- MAKE SURE CHECK SUM MATCHES 




F331 


5D 


00F3 










EOR 


DNIBL,X 




; BETTER BE ZERO 




F334 


D016 












BNE 


POSTERR 




,- BRANCH IF IT IS 




F336 


A2 


56 










POST1 LDX 


#56 




; INIT NBUF2 INDEX 




F338 


CA 












POST2 DEX 






; NBUF IDX $55 TO $00 




F339 


30FB 












BMI 


POST1 




; WRAPAROUND IF NEG 




F33B 


B9 


0002 










LDA 


NBUF1.Y 








F33E 


5E 


0203 










LSR 


NBUF2,X 




,- SHIFT 2 BITS FROM 




F341 


2A 














ROL 


A 




,- CURRENT NBUF2 NIBL 




F342 


5E 


0203 










LSR 


NBUF2,X 




; CURRENT NBUF1 




F345 


2A 














ROL 


A 




,• NIBL. 




F34 6 


91 


9B 












STA 


(BUF) , Y 




; BYTE OF USER DATA 




F348 


C8 














INY 






; NEXT USER BYTE 




F349 


D0ED 












BNE 


POST2 








F34B 


18 














CLC 






; GOOD DATA 




F34C 


F34C 










POSTERR .EQU 


* 








F34C 


AD 


DFFF 








SET1MEG LDA 


ENVIRON 








F34F 


09 


80 












ORA 


#ONEMEG 




; SET TO ONE MEGAHERTZ CLOCK RATE 




F351 


8D 


DFFF 










STA 


ENVIRON 








F354 


60 












SEV RTS 






; (SEV USED TO SET VFLAG) 




F355 


























F355 
















************************** 








F355 


















* 








F355 
















6-BIT TO 7 


-BIT * 








F355 
















NIBL CONVERSION TABLE * 








F355 


















* 








F355 
















************************** 








F355 


















* 








F355 
















CODES WITH MORE THAN * 








F355 
















ONE PAIR OF ADJACENT * 








F355 
















ZEROES OR WITH NO * 








F355 
















ADJACENT ONES (EXCEPT * 








F355 
















B7) ARE EXCLUDED. * 








F355 


















* 








F355 
















*************** 


*********** 








F355 


























F355 


96 


97 


9A 


9B 


9D 


9E 


9F : 


«BL .BYTE 96, 


97, 9A, 9B, 9D, 


9E 


9F , 0A6 , 0A7 , 0AB , 0AC , 0AD , 0AE , 0AF , 0B2 , 0B3 , 0B4 , 0B5 




F35C 


A6 


A7 


AB 


AC 


AD 


AE 


AF 












F363 


B2 


B3 


B4 


B5 


















F367 


B6 


B7 


B9 


BA 


BB 


BC 


BD 


.BYTE 0B6 


0B7,0B9,0BA 


, 0BB, 0BC, 0BD, 0BE, 0BF, 0CB, 0CD, 0CE, 0CF, 0D3, 0D6, 0D7 




F36E 


BE 


BF 


CB 


CD 


CE 


CF 


D3 












F375 


D6 


D7 






















F377 


D9 


DA 


DB 


DC 


DD 


DE 


DF 


.BYTE 0D9 


0DA, 0DB, 0DC 


, 0DD, 0DE, 0DF, 0E5, 0E6, 0E7 , 0E9, 0EA, 0EB, 0EC. 0ED. 0EE 




F37E 


E5 


E6 


E7 


E9 


EA 


EB 


EC 












F385 


ED 


EE 






















F387 


EF 


F2 


F3 


F4 


F5 


F6 


F7 


.BYTE 0EF 


0F2,0F3,0F4 


, 0F5, 0F6, 0F7, 0F9, 0FA, 0FB, 0FC, 0FD, 0FE, 0FF 




F38E 


F9 


FA 


FB 


FC 


FD 


FE 


FF 












F395 


























F395 
















************************** 








F395 


















* 








F395 
















7-BIT TO 6 


-BIT * 








F395 
















'DENIBLIZE' 


TABL * 








F395 
















(16-SECTOR FORMAT) * 








F395 


















* 








F395 
















VALID CODES * 








F395 
















$96 TO SFF 


ONLY . * 








F395 


















* 








F395 


















* 








F395 
















CODES WITH MORE THAN * 








F395 
















ONE PAIR OF ADJACENT * 








F395 
















ZEROES OR WITH NO * 








F395 
















ADJACENT ONES (EXCEPT * 








F395 
















BIT 7) ARE EXCLUDED * 








F395 
















*************** 


*********** 








F395 


























F395 


F300 












)NIBL .EQU 


REGRWTS+300 






F395 


01 


00 


01 










-BYTE 


01,00,01 








F398 


98 


99 


02 


03 


9C 


04 


05 


.BYTE 


98,99,02, 


03 


9C , 04 , 05 , 06, 0A0, 0A1 , 0A2 , 0A3 , 0A4 , 0A5 , 07 , 08 , 0A8 




F39F 


06 


A0 


Al 


A2 


A3 


A4 


A5 












F3A6 


07 


08 


A8 




















F3A9 


A9 


AA 


09 


0A 


0B 


0C 


0D 


.BYTE 


0A9,0AA,09,0A,0B,0C,0D,0B0,0B1,0E,0F,10,11,12,13,0B8,14,15 




F3B0 


B0 


Bl 


0E 


0F 


10 


11 


12 












F3B7 


13 


B8 


14 


15 


















F3BB 


16 


17 


18 


19 


1A 






.BYTE 


16,17,18, 


19 


1A 


j 
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F3C0 
F3C7 
F3CE 
F3D0 
F3D7 
F3DE 
F3E2 
F3E9 
F3F0 
F3F4 
F3FB 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F400 
F402 
F404 
F406 
F408 
F40A 
F40C 
F40E 
F40F 
F411 
F413 
F415 
F417 
F419 
F41B 
F41D 
F41F 
F421 
F423 
F425 
F427 
F429 
F42A 
F42B 
F42E 
F431 
F434 
F436 
F437 
F43A 
F43D 
F440 



DE AA 
C7 C8 
ID IE 
D0 Dl 
21 D8 
27 28 
E2 E3 
2C 2D 
F0 Fl 
35 36 
3B 3C 



EB FF 
C9 CA 

D2 IF 
22 23 
E0 El 
E4 2 9 
2E 2F 
33 34 
37 38 
3D 3E 



C4 C5 C6 

IB CC 1C 



D4 DS 20 
24 25 26 



2A 2B E8 
30 31 32 



F8 39 3A 

3F 



85 9E 
C5 8C 
F04 2 
A9 00 
85 95 
A5 8C 
85 9D 
38 

E5 9E 
F031 
B006 
4 9 FF 
E6 8C 
9004 
69 FE 
C6 8C 
C5 95 
9002 
A5 95 
C9 09 
B002 
A8 
38 

20 48F4 
B9 67F4 
20 56F4 
A5 9D 
18 

20 4AF4 
B9 70F4 
20 56F4 
E6 95 



BITSLIPMK .BYTE 0DE, 0AA, 0EB, 0FF, 0C4, 0C5, 0C6, 0C7, 0C8, 0C9, 0CA, 1B,0CC,1C, ID, IE 

.BYTE 0D0,0D1,0D2,1F,0D4,0D5,20, 21.0D8, 22, 23, 24, 25, 2 6, 27, 28, 0E0, 0E1 

.BYTE 0E2, 0E3, 0E4, 29, 2A, 2B, 0E8, 2C, 2D, 2E, 2F, 30, 31 , 32, 0F0, 0F1, 33, 34 

.BYTE 35,3 6,37,38,0F8,39,3A, 3B,3C, 3D, 3E, 3F 

************************* 

* 

FAST SEEK SUBROUTINE * 

* 

************************* 

* 

ON ENTRY * 

* 

X-REG HOLDS SLOTNUM * 

TIMES $10 * 

* 

A-REG HOLDS DESIRED * 
HALFTRACK. * 

CURTRK HOLDS DESIRED * 
HALFTRACK. * 

* 

ON EXIT * 

* 

A-REG UNCERTAIN. » 

Y-REG UNCERTAIN. * 

X-REG UNDISTURBED. * 

* 

CURTRK AND TRKN HOLD * 
FINAL HALFTRACK. * 

* 

PRIOR HOLDS PRIOR * 
HALFTRACK IF SEEK * 
WAS REQUIRED. * 

MONTIMEL AND MONTIMEH * 

ARE INCREMENTED BY * 

THE NUMBER OF * 

100 USEC QUANTUMS * 

REQUIRED BY SEEK » 

FOR MOTOR ON TIME * 

OVERLAP . * 

VARIABLES USED * 

CURTRK, TRKN, COUNT, * 
PRIOR, SLOTTEMP * 
MONTIMEL, MONTIMEH * 



*********** 



<********* 



SEEK 


STA 


TRKN 




CMP 


CURTRK 




BEQ 


SETPHASE 




LDA 


#00 




STA 


TRKCNT 


SEEK2 


LDA 


CURTRK 




STA 


PRIOR 




SEC 






SBC 


TRKN 




BEQ 


SEEKEND 




BCS 


OUT 




EOR 


#0FF 




INC 


CURTRK 




BCC 


MINTST 


OUT 


ADC 


#0FE ; 




DEC 


CURTRK 


MINTST 


CMP 


TRKCNT 




BCC 


MAXTST 




LDA 


TRKCNT 


MAXTST 


CMP 


#09 




BCS 


STEP 2 


STEP 


TAY 
SEC 


•" 


STEP 2 


JSR 


SETPHASE 




LDA 


ONTABLE, Y 




JSR 


MSWAIT 




LDA 


PRIOR 




CLC 






JSR 


CLRPHASE 




LDA 


OFFTABLE.Y 




JSR 


MSWAIT 




INC 


TRKCNT 



SAVE TARGET TRACK 
ON DESIRED TRACK? 
YES, ENERGIZE PHASE AND RETURN 

HALFTRACK COUNT. 
SAVE CURTRK FOR 
DELAYED TURN OFF. 

DELTA-TRACKS . 

BR IF CURTRK=DESTINATION 

(MOVE OUT, NOT IN) 

CALC TRKS TO GO. 

DECR CURRENT TRACK (OUT) 

(ALWAYS TAKEN) . 
CALC TRACKS TO GO. 
DECR CURRENT TRACK 



AND 'TRKS MOVED' 



(OUT) 



IF TRKCNT>$08 LEAVE Y ALONE (Y=$08) 
ELSE SET ACCELERATION INDEX IN Y 



FOR 'ONTIME' 
(100 USEC INTERVALS) 

FOR PHASE OFF 
TURN OFF PRIOR PHASE 
THEN WAIT 'OFFTIME' 
(100 USEC INTERVALS) 
'TRACKS MOVED' COUNT. 
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F442 
F444 
F447 
F448 
F44A 
F44C 
F44D 
F44F 
F450 
F453 
F455 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F456 
F458 
F459 
F45B 
F45D 
F45F 
F461 
F462 
F464 
F466 
F467 
F467 
F467 
F467 
F467 
F467 
F467 
F467 
F467 
F467 
F46E 
F470 
F477 
F479 
F479 
F47B 
F47D 
F47E 
F47F 
F481 
F482 
F484 
F485 
F487 
F488 
F48B 
F48D 
F4 90 
F4 92 
F494 
F496 
F498 
F4 9B 
F49D 
F4 9F 
F4A0 
F4A0 
F4A7 
F4A8 



D0C6 

20 56F4 

18 

A5 8C 

2 9 03 

2A 

05 81 

AA 

BD 80C0 

A6 81 

60 





BNE 


SEEK2 


SEEKEND 


JSR 
CLC 


MSWAIT 


SETPHASE 


LDA 


CURTRK 


CLRPHASE 


AND 


#03 




ROL 


A 




ORA 


IBSLOT 




TAX 






LDA 


PHASEOFF,X 




LDX 


IBSLOT 


SEEKRTS 


RTS 





(ALWAYS TAKEN) 

SETTLE 25 MSEC 

SET FOR PHASE OFF 

GET CURRENT TRACK 

MASK FOR 1 AND 4 PHASES 

DOUBLE FOR PHASE ON /OFF INDEX 



TURN ON/OFF ONE PHASE 
RESTORE X-REG 
AND RETURN 



*************** 



i *********** 



MSWAIT SUBROUTINE 

********************** 

DELAYS A SPECIFIED 
NUMBER OF 100 USEC 
INTERVALS FOR MOTOR 
ON TIMING 



ON EXIT 



A-REG HOLDS $00 * 
X-REG HOLDS $00 * 
Y-REG UNCHANGED * 
CARRY SET * 

* 

MONTIMEL, MONTIMEH * 
ARE INCREMENTED ONCE * 
PER 100 USEC INTERVAL * 
FOR MOTOR ON TIMING * 

* 

ASSUMES * 

* 

1 USEC CYCLE TIME * 

* 

i************************** 



A2 11 

CA 

D0FD 

E6 99 

D002 

E6 9A 

38 

E9 01 

D0F0 

60 



MSWAIT 
MSW1 



******* 



LDX 
DEX 
BNE 
INC 
BNE 
INC 
SEC 
SBC 
BNE 
RTS 

t ****** * 



#11 

MSW1 

MONTIMEL 

MSW2 

MONTIMEH 

#01 
MSWAIT 



******** 



DELAY 86 USEC 



DOUBLE BYTE INCREMENT 



DONE IN INTERVALS 
(A-REG COUNTS) 



01 30 28 24 20 IE ID 
1C 1C 

70 2C 26 22 IF IE ID 
1C 1C 

86 83 

A0 05 

48 

0A 

26 83 

88 

D0FA 

68 

29 07 

A8 

B9 A0F4 

85 84 

20 00F0 

B00B 

E6 86 

E6 84 

E6 84 

20 00F0 

C6 86 

A5 88 

60 

00 04 08 0C 01 05 09 
0D 



PHASE ON-, OFF-TIME * 
TABLES IN 100-USEC * 
INTERVALS. (SEEK) * 

* 
************************ 

ONTABLE .BYTE 01,30,28,24, 
OFFTABLE .BYTE 70, 2C, 26, 22, 



20,1E,1D,1C,1C 
IF, IE, 1D,1C,1C 



BLOCKIO STX 
LDY 
PHA 

TRKSEC ASL 
ROL 
DEY 
BNE 
PLA 
AND 
TAY 
LDA 
STA 
JSR 
BCS 
INC 
INC 
INC 
JSR 
DEC 

QUIT LDA 
RTS 



IBTRK 
#05 



A 
IBTRK 



#07 

SECTABL, Y 

IB SECT 

REGRWTS 

QUIT 

IBBUFP+1 

IB SECT 

IB SECT 

REGRWTS 

IBBUFP+1 

IBSTAT 



SECTABL 



.BYTE 00, 04, 08, 0C, 01, 05, 09, 0D 



******* 
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F4A8I 


















* 












F4A8I 










JOYSTICK READ ROUTINE 


* 












F4A8I 


















* 












F4A8| 








******************************* 












F4A8| 








ENTRY 


ACC= COUNT DOWN HIGH * 












F4A8I 












XSY= DON" 


T CARE 


* 












F4A8I 


















* 












F4A8I 










EXIT 


ACC- TIMER HIGH BYTE * 












F4A8I 












Y= TIMER LOW BYTE 


* 












F4A8| 












CARRY CLEAR 




* 












F4A8I 


















* 












F4A8I 










IF CARRY SET, 


ROUTINE 


* 












F4A8I 










WAS INTERRUPTED S 


* 












F4A8I 










ACC S Y ARE 


INVALID 


* 












F4A8| 








********* 


********************** 












F4A8I 






























F4A8I FFD9 




TIMLATCH 


.EQU 


0FFD9 














F4A8I FFD8 




TIMER1L 


.EQU 


0FFD8 














F4A8I FFD9 




TIMER1H 


.EQU 


0FFD9 














F4A8I C066 




JOYRDY 


.EQU 


0C066 














F4A8I 






























F4A8I F4A8 




ANALOG 


.EQU 


* 




,- CARRY 


SHOULD BE 


SET! 






F4A8| 8D 


D9FF 








STA 


TIMLATCH 


; START THE 


TIMER 








F4ABI AD 


EFFF 


ANLOG1 


LDA 


INTERUPT 














F4AEI 2D 


66C0 








AND 


JOYRDY 


; WAIT FOR ONE OR 


THE OTHER TO GO LOW 


F4B1I 30F8 










BMI 


ANLOG1 














F4B3| AD 


66C0 








LDA 


JOYRDY 


; WAS IT 


REALLY THE JOPYSTICK? 




F4B6| 300C 










BMI 


GOODTIME 


; NOPE, WHAT TIME 


IS IT? 






F4B8| 18 












CLC 






; TIME'S 


A SLIP SLIDIN AWAY 






F4B9I AD 


D9FF 








LDA 


TIMER1H 


; NOW, WHAT 


TIME IS IT? 






F4BCI AC 


D8FF 








LDY 


TIMER1L 














F4BF| 1003 










BPL 


GOODTIME 


; TIME WAS VALID! 








F4C1| AD 


D9FF 








LDA 


TIMER1H 


; HI BYTE CHANGED 








F4C4| 60 






GOODTIME 


RTS 


















F4C5I 






























F4C5I 












.END 


















SYMBOL TABLE DUMP 


AB - Absolute 


LB - Label 




UD - 


Undefined 


MC - Macro 












RF - Ref 






DF - Def 




PR - 


Proc 




FC - Func 












PB - Public 




PV - Prlva 


:e 


CS - 


Consts 


















ALD0NE1 


LB 


F0EB 


ALLDONE 


LB 


F0E3 


ALLOFF 


LB 


F118 


ANALOG 


LB 


F4A8 


ANLOG1 


LB 


F4AB I 


BITSLIPM 


LB 


F3C0 


BLOCK 10 


LB 


F479 


BUF 


AB 


009B 


CHKDRV 


LB 


F12B 


CHKDRV1 


LB 


F12D I 


CHKINT 


LB 


F1AA 


CKDRTS 


LB 


F13D 


CKSUM 


AB 


0096 


CLRPHASE 


LB 


F44A 


CONWAIT 


LB 


F054 | 


CORRECTV 


LB 


F0C4 


COUNT 


AB 


0095 


CSSTV 


AB 


0097 


CSUM 


AB 


008 9 


CSUM1 


AB 


0097 | 


CURTRK 


AB 


008C 


DISKIO 


PR 





DNIBL 


LB 


F300 


DRIVSEL 


LB 


F035 


DRV1EN 


AB 


C08B I 


DRVERR 


LB 


F0E8 


DRVINDX 


LB 


F13E 


DRVOEN 


AB 


C08A 


DRVOTRK 


AB 


0085 


DRVWAIT 


LB 


F041 I 


DVMOT 


AB 


00E0 


ENVIRON 


AB 


FFDF 


ENVTEMP AB 


009F 


GOCAL 


LB 


F0A7 


GOCAL1 


LB 


F0A6 | 


GOODTIME 


LB 


F4C4 


GOSEEK 


LB 


F115 


GOSERV 


LB 


F1B4 


HNDLERR 


LB 


F0EA 


HRDERRS 


AB 


0080 I 


IBBUFP 


AB 


0085 


IBCMD 


AB 


0087 


IBDERR 


AB 


0082 


IBDRVN 


AB 


0082 


IBNODRV 


AB 


0080 I 


IBRERR 


AB 


0083 


IBSECT 


AB 


0084 


IBSLOT 


AB 


0081 


IBSMOD 


AB 


008 9 


IBSTAT 


AB 


0088 | 


IBTRK 


AB 


0083 


IBWPER 


AB 


0081 


I MASK 


AB 


008B 


INTERUPT 


AB 


FFEF 


IOBPDN 


AB 


008A | 


JOYRDY 


AB 


C06 6 


LAST 


AB 


0095 


MAXTST 


LB 


F425 


MINTST 


LB 


F41F 


MONTIMEH 


AB 


009A I 


MONTI MEL 


AB 


0099 


MOT OF 


LB 


F052 


MOTOROFF AB 


C088 


MOTORON 


AB 


C089 


MSW1 


LB 


F458 I 


MSW2 


LB 


F461 


MSWAIT 


LB 


F456 


MYSEEK 


LB 


F104 


NBOF1 


AB 


0200 


NBUF2 


AB 


0302 | 


NIBL 


LB 


F355 


NODRIVER 


LB 


F064 


NOWRITE LB 


F2A3 


NXOFF 


LB 


F11A 


OFFTABLE 


LB 


F470 | 


OK 


LB 


F04 8 


ONE MEG 


AB 


0080 


ONTABLE LB 


F467 


OUT 


LB 


F41B 


PHASEOFF 


AB 


C080 I 


PHASEON 


AB 


C081 


PHASON 


AB 


C081 


PHSOFF 


AB 


C080 


PNIBL1 


LB 


F314 


PNIBL2 


LB 


F323 ! 


POST1 


LB 


F336 


POST2 


LB 


F338 


POSTERR LB 


F34C 


POSTNIB1 


LB 


F30F 


PRENIB1 


LB 


F2C8 I 


PRENIB16 


LB 


F2C4 


PRENIB2 


LB 


F2E5 


PRENIB3 LB 


F2E2 


PRENIB4 


LB 


F2F6 


PRIOR 


AB 


009D | 


Q6H 


AB 


C08D 


Q6L 


AB 


C08C 


Q7H 


AB 


C08F 


Q7L 


AB 


C08E 


QUIT 


LB 


F49D | 


RD1 


LB 


F14D 


RD2 


LB 


F157 


RD3 


LB 


F163 


RD4 


LB 


F16E 


RD5 


LB 


F180 I 


RD5A 


LB 


F181 


RD6 


LB 


F195 


RDA1 


LB 


F1C4 


RDA2 


LB 


F1CE 


RDA3 


LB 


F1D9 1 


RDA4 


LB 


F1E7 


RDA5 


LB 


FIEF 


RDA6 


LB 


F201 


RDA7 


LB 


F20B 


RDADR1 6 


LB 


F1B9 I 


RDAFLD 


LB 


F1E5 


RDASN1 


LB 


F1C9 


RDASYN 


LB 


F1BD 


RDCKSUM 


LB 


F1A0 


RDERR 


LB 


F1B7 | 


RDEXIT 


LB 


F214 


RDRIGHT 


LB 


F0AC 


READ16 


LB 


F148 


REGRWTS 


LB 


F000 


RETRYCNT 


AB 


0093 | 


RSYNC 


LB 


F14A 


RSYNC1 


LB 


F152 


RTTRK 


LB 


F0C0 


SECT 


AB 


0098 


SECTABL 


LB 


F4A0 | 


SEEK 


LB 


F400 


SEEK1 


LB 


F105 


SEEK2 


LB 


F40A 


SEEKCNT 


AB 


0094 


SEEKEND 


LB 


F444 | 


SEEKRTS 


LB 


F455 


SERVICE 


LB 


F2AA 


SET 1 MEG LB 


F34C 


SETPHASE 


LB 


F448 


SETTRK 


LB 


F125 I 


SEV 


LB 


F354 


STEP 


LB 


F429 


STEP2 


LB 


F42B 


TEMP 


AB 


0097 


TIMER1H 


AB 


FFD9 I 


TIMER1L 


AB 


FFD8 


TIMLATCH 


AB 


FFD9 


TRACK 


AB 


009 9 


TRKCNT 


AB 


0095 


TRKN 


AB 


009E I 


TRKN1 


AB 


009 9 


TRKSEC 


LB 


F47E 


TRYADR 


LB 


F083 


TRYADR2 


LB 


F08A 


TRYTRK 


LB 


F069 I 


TRYTRK2 


LB 


F07F 


TWOMEG 


AB 


007 F 


VOLUME 


AB 


009A 


VRYFRST 


LB 


F253 


WDATA2 


LB 


F26E | 


WDATA3 


LB 


F27E 


WEXIT 


LB 


F215 


WINTRPT LB 


F24B 


WMIDLE 


LB 


F267 


WNIBL 


LB 


F2BD I 


WNIBL7 


LB 


F2BB 


WNIBL9 


LB 


F2BA 


WNTRPT1 LB 


F264 


WRBITSLM 


LB 


F297 


WRCKSUM 


LB 


F292 I 


WRIT 


LB 


F0F9 


WRIT1 


LB 


F220 


WRITE 16 LB 


F216 


WRTFRST 


LB 


F255 


WSYNC 


LB 


F22D | 



Assembly complete: 1076 lines 
Errors flagged on this Assembly 



6502 OPCODE STATIC FREQUENCIES 



ADC 
AND 
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ASL 
BCC 
BCS 

BEQ 
BIT 
BMI 
BNE 
BPL 
BVC 
CLC 
CLI 
CLV 
CMP 
CPX 
CPY 
DEC 
DEX 
DEY 
EOR 
INC 
I NX 
I NY 
JMP 
JSR 
LDA 
LDX 
LDY 
LSR 
NOP 
ORA 
PHA 
PHP 
PLA 
PLP 
ROL 
ROR 
RTS 
SBC 
SEC 
SEI 
STA 
STX 
STY 
TAX 
TAY 
TXA 
TYA 



3 

10 

7 

8 

3 

10 

38 

28 

1 

9 

2 

1 

14 

1 

4 

5 

2 

13 

8 

10 

2 

12 

2 

39 

86 

12 

18 

9 

13 

9 

10 

4 

11 

3 

7 

e 

16 
2 
9 
1 

42 
1 
3 
5 
3 
1 
4 



******** 

****** 

******* 

** 

******** 

********************************* 

************************ 

******* 



************ 



******* 



********** 



********* 



c** ******** 

c** ******** 



***** 
***** 



** ** * 
** ** * 



*************************** 



*************** 

******* 

*********** 

******* 

******** 

** * 

********* 



******** 



************* 



Minimum frequency = 1 
Maximum frequency = 8 6 

Average frequency = 10 

Unused opcodes : 

BRK BVS CLD RTI SED TSX TXS 

Program opcode usage: 87 % 



(1.00) That's all. Folks 
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Souree Code Listing 




o | 


for 


| o I 






o I 






| o 1 






o | 

o 1 


^JP^ff^ll^ 


| o I 
| o I 






o 1 
o 1 




| o I 
1 ° I 










o | 




| o I 






o | 




1 o 1 






o | 
o | 
o | 


ROM 

Diagnostics 


| o I 
| o I 
1 o I 






O ! 




I ° 1 






o | 




i o I 






o | 
o I 




| o 1 
| o 1 




David T. Craig 




o ! 

o | 
o | 


736 Edgewater 
Wichita, Kansas 67230 


I ° 
1 ° 
1 ° 














>- 


p 
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0000 




444444444**4****4444444****44*****4*****4***4444444444 




0000 




4 APPLE /// ROM - DIAGNOSTIC ROUTINES 






0000 




4 COPYRIGHT 1979 BY APPLE COMPUTER, INC. 






0000 




4*44**4*4***4444444*44*4*4444*444*44*4**44*4444**44*** 






0000 










0000 




.ABSOLUTE 






0000 




.PROC SARATESTS 






0000 










0000 




******************************************************************** 






0000 










0000 




SARA DIAGNOSTIC TEST ROUTINES , lilt 






0000 




,» ["HaL \j( 






0000 




DECEMBER 1 8 .1979 , U \J ' W-l C 






0000 

0000 




BY j*_ 






W. BROEDNER t R. LASHLEY <% — — — ■ „ 




0000 










0000 




COPYRIGHT 197 9 BY APPLE COMPUTER, INC. / 






0000 










0000 




******************************************************************** / 






0000 










0000 


0001 ROM .EQU 01 / 






0000 


0000 ZRPG .EQU 00 / 






0000 


0010 ZRPG1 .EQU 10 / 






0000 


0018 PTRLO .EQU ZRPG1+08 / 






0000 


0019 PTRHI .EQU ZRPG1+09 / 






0000 


001A BNK .EQU ZRPG1+0A / 






0000 


008 7 


:bcmd .equ 87 y 






0000 


0085 


[BBUFP .EQU 85 






0000 


0091 PREVTRK .EQU 91 . /" 
F479 BLOCKIO .EQU 0F479 //*! «' fj 
005D CV .EQU 5D -O f.PO. qQL- 
00FF STK0 .EQU 0FF f) Y" 1 A ft*" 






0000 






0000 






0000 






0000 


1419 


BNK .EQU 1400+PTRHI Y | J J}' \ 
>HPR .EQU 1800+ZRPGl , h ^ (M rp 
(YBD .EQU 0C000 \rAVA I ift" 






0000 


1810 [ 






0000 


C000 I 






0000 


C008 KEYBD .EQU 0C008 j IA> v / W 






0000 


C010 KBDSTRB .EQU 0C010 ' \\ frfC^ 






0000 


C058 PDLEN .EQU 0C05 8 rj JV 






0000 


C04 7 ADRS .EQU 0C04 7 AX\L^ 






0000 


C050 GRMD .EQU 0C050 1 V*"^ , i 






0000 


C051 TXTMD .EQU 0C051 ' n A'LIL- 






0000 


C066 ADTO .EQU 0C066 U S\ T*"^ 






0000 


C0D0 DISKOFF .EQU 0C0D0 \ jtT ll 






0000 


C0F1 ACIAST .EQU 0C0F1 XV fig 






0000 


C0F2 ACIACM .EQU 0C0F2 * | /' 
C0F3 ACIACN .EQU 0C0F3 I \Q. 
C100 SLTl .EQU 0C100 |y OpV 1 , 
C200 SLT2 .EQU 0C200 \\ \ 1 Jtf 






0000 






0000 






0000 






0000 


C300 SLT3 .EQU 0C300 ' ' „<& 

C400 SLT4 .EQU 0C400 *).*•>•? ri-J 

CFFF EXPROM .EQU 0CFFF Pi' 1 1 M 

FFD0 ZPREG .EQU 0FFD0 U / ^ L^' 

FFDF SYSDl .EQU 0FFDF Aj t' 1 t (. 

FFD2 SYSD2 .EQU 0FFD2 W' /f 






0000 






0000 






0000 






0000 






0000 






0000 


FFD3 SYSD3 .EQU 0FFD3 | ,\i(r „ 
FFE0 SYSE0 .EQU 0FFE0 k \%P* A % 
FFEF BNKSW .EQU 0FFEF IX> > /VfiJ 
FFE2 SYSE2 .EQU 0FFE2 I 
FFE3 SYSE3 .EQU 0FFE3 1 A f V \ 
FC25 COOT .EQU 0FC2 5 S\ wOT ' 
FD07 CROUTl .EQU 0FD07 1 £' 






0000 






0000 






0000 






0000 






0000 






0000 






0000 


FD0F KEY IN .EQU 0FD0F (J 






0000 


FBC7 SETCVH .EQU 0FBC7 






0000 


FD98 CLDSTRT .EQU 0FD98 






0000 


FD9D SETUP .EQU 0FD9D 






0000 


F901 MONITOR .EQU 0F901 






0000 










0000 




.ORG 0F4C5 






F4C5 


00 Bl B2 BA B9 10 00 RAMTBL .BYTE 00, 0B1 , 0B2 , 0BA, 0B9, 10, 00, 13 






F4CC 


13 








F4CD 


F4CD CHPG .EQU * 






F4CD 


52 41 


.ASCII "RA" 






F4CF 


CD 


.BYTE 0CD ; M 






F4D0 


52 4F 


.ASCII "RO" 






F4D2 


CD 


.BYTE 0CD ; M 






F4D3 


56 49 


.ASCII "VI" 






F4D5 


CI 


.BYTE 0C1 ; A 






F4D6 


41 43 49 


.ASCII "AC I" 






F4D9 


CI 


.BYTE 0C1 ; A 






F4DA 


41 2F 


.ASCII "A/" 






F4DC 


C4 


.BYTE 0C4 ; D 






F4DD 


44 49 41 47 4E 4F 53 


.ASCII "DIAGNOSTI" 






F4E4 


54 49 








F4E6 


C3 


.BYTE 0C3 ; C 






F4E7 


5A 


.ASCII "Z" 






F4E8 


D0 


.BYTE 0D0 ; P 






F4E9 


52 45 54 52 


.ASCII "RETR" 






F4ED 


D9 


.BYTE 0D9 ; Y 






F4EE 










F4EE 




SETUP SYSTEM 










k 


Page 0094 of 0" 


70 



t 








> 
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F4EE 




. 






F4EE 




- 








F4EE 


A9 53 


LDA #52+ROM 


TORN OFF SCREEN, SET 2MHZ SPEED 






F4F0 


8D DFFF 


ETA SYSD1 ; 


AND RUN OFF ROM 






F4F3 


A2 00 


LDX #00 


SET BANK SWITCH TO ZERO 






F4F5 


8E E0FF 


SIX SYSE0 








F4F8 


8E EFFF 


STX BNKSW 








F4FB 


8E D0FF 


STX ZPREG 


AND SET ZERO PAGE SAME 






F4FE 


CA 


DEX 








F4FF 


8E D2FF 


STX SYSD2 


PROGRAM DDR'S 






F502 


8E D3FF 


STX SYSD3 








F505 


9A 


TXS 








F506 


E8 


I NX 








F507 


A9 0F 


LDA #0F 








F509 


8D E3FF 


ST A SYSE3 








F50C 


A9 3F 


LDA #3F 








F50E 


8D E2FF 


STA SYSE2 








F511 


A0 0E 


LDY #0E 








F513 


B9 D0C0 


DISK1 LDA DISKOFF,Y 








F516 


88 


DEY 








F517 


88 


DEY 








F518 


10F9 


BPL DISK1 








F51A 


AD 08C0 


LDA KEYBD 








F51D 


2 9 04 


AND #04 








F51F 


D003 


BNE NXBYT 








F521 


4C 86F6 


JMP RECON 








F524 












F524 




; VERIFY ZERO PAGE 








F524 












F524 


A9 01 


NXBYT LDA #01 


ROTATE A 1 THROUGH 






F526 


95 00 


NXBIT STA ZRPG,X 


EACH BIT IN THE PG 






F528 


D5 00 


CMP ZRPG,X 


TO COMPLETELY TEST 






F52A 


D0FE 


NOGOOD BNE NOGOOD 


THE PAGE. HANG IF NOGOOD. 






F52C 


0A 


ASL A 


TRY NEXT BIT OF BYTE 






F52D 


D0F7 


BNE NXBIT 


UNTIL BYTE IS ZERO. 






F52F 


E8 


INX 


CONTINUE UNTIL PAGE 






F530 


D0F2 


BNE NXBYT 


IS DONE. 






F532 


8A 


CNTWK TXA 


PUSH A DIFFERENT 






F533 


48 


PHA 


BYTE ONTO THE 






F534 


E8 


INX 


STACK UNTIL ALL 






F535 


D0FB 


BNE CNTWR 


STCK BYTES ARE FULL. 






F537 


CA 


DEX 


THEN PULL THEM 






F538 


86 18 


STX PTRLO 


OFF AND COMPARE TO 






F53A 


68 


PULBT PLA 


THE COUNTER GOING 






F53B 


C5 18 


CMP PTRLO 


BACKWARDS. HANG IF 






F53D 


D0EB 


BNE NOGOOD 


THEY DON'T AGREE. 






F53F 


C6 18 


DEC PTRLO 


GET NEXT COUNTER BYTE 






F541 


D0F7 


BNE PULBT 


CONTINUE UNTIL STACK 






F543 


68 


PLA 


IS DONE. TEST LAST BYTE 






F544 


D0E4 


BNE NOGOOD 


AGAINST ZERO. 






F54 6 












F546 




; SIZE IN MEMORY 








F546 












F54 6 


A2 08 


LDX #08 


ZERO THE BYTES USED TO DISPLAY 






F548 


95 10 


NOMEM STA ZRPG1,X 


THE BAD RAM LOCATIONS 






F54A 


CA 


DEX 


EACH BYTE= A CAS LINE 






F54B 


10FB 


BPL NOMEM 


ON THE SARA BOARD. 






F54D 


A2 02 


LDX #02 


STARTING AT PAGE 2 






F54F 


86 19 


NMEM1 STX PTRHI 


TEST THE LAST BYTE 






F551 


A9 00 


LDA #00 


IN EACH MEM PAGE TO 






F553 


A0 FF 


LDY #0FF 


SEE IF THE CHIPS ARE 






F555 


91 18 


STA (PTRLO), Y 


THERE.. (AVOID i STK PAGES) 






F557 


Dl 18 


CMP (PTRLO), Y 


CAN THE BYTE BE O'D? 






F559 


F007 


BEQ NMEM2 








F55B 


20 48F7 


JSR RAM 


NO, FIND WHICH CAS IT IS. 






F55E 


94 10 


STY ZRPG1,X 


SET CORRES. BYTE TO $FF 






F560 


A6 19 


LDX PTRHI 


RESTORE X REGISTER 






F562 


E8 


NMEM2 INX 


AND INCREMENT TO NEXT 






F563 


E0 C0 


CPX #0C0 


PAGE UNTIL I/O IS REACHED. 






F565 


D0E8 


BNE NMEM1 








F567 


A2 20 


LDX #20 


THEN RESET TO PAGE 20 






F569 


EE EFFF 


INC BNKSW 


AND GOTO NEXT BANK TO 






F56C 


AD EFFF 


LDA BNKSW 


■ CONTINUE. (MASK INPUTS 






F56F 


2 9 0F 


AND #0F 


■ FROM BANKSWITCH TO SEE 






F571 


C9 03 


CMP #03 


• WHAT SWITCH IS SET TO) 






F573 


D0DA 


BNE NMEM1 


• CONTINUE UNTIL BANK '3' 






F575 












F575 




; SETUP SCREEN 








F575 












F575 


20 9DFD 


ERRLP JSR SETUP 


■ CALL SCRN SETUP ROUTINE 






F578 


A2 00 


LDX #00 


■ SETUP I/O AGAIN 






F57A 


8E E0FF 


STX SYSE0 


■ FOR VIA TEST 






F57D 


CA 


DEX 


■ PROGRAM DATA DIR 






F57E 


8E D2FF 


STX SYSD2 


■ REGISTERS 






F581 


8E D3FF 


STX SYSD3 








F584 


A9 3F 


LDA #3F 








F586 


8D E2FF 


STA SYSE2 








F589 


A9 0F 


LDA #0F 








F58B 


8D E3FF 


STA SYSE3 








F58E 


A2 10 


LDX #10 


; HEADING OF 'DIAGNOSTICS' WITH 
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F590I 20 38F7 


JSR STRWT ; THIS SUBROUTINE 




F593I A2 00 


ERRLP1 LDX #00 


PRINT ■RAM" 






F595I 86 5D 


STX CV 


SET CURSOR TO 2ND LINE 






F597| A9 04 


LDA #04 


SPACE CURSOR OUT 3 






F599I 20 C7FB 


JSR SETCVH 


(X STILL=0 ON RETURN) 






F59CI 20 38F7 


JSR STRWT 


THE SAME SUBROUTINE 






F59FI A2 07 


LDX #07 


FOR BYTES 7 - IN 






F5A1I F5A1 


RAMWT1 .EQU * 






F5A1I B5 10 


LDA ZRPG1,X 


OUT EACH BIT AS A 






F5A3I A0 08 


LDY #08 


1 ' OR "l" FOR INDICATE BAD OR MISSING RAM 






F5A5I 0A 


RAMWT2 ASL A 


CHIPS SUBROUTINE 'RAM' RAM 






F5A6| 48 


PHA 


SETS UP THESE BYTES 






F5A7| A9 AE 


LDA #0AE 


LOAD A " . " TO ACC . 






F5A9I 9002 


BCC RAMWT4 






F5ABI A9 31 


LDA #31 


LOAD A '1' TO ACC. 






F5ADI 20 25FC 


RAMWT4 JSR COUT 


AND PRINT IT 






F5B0I 68 


PLA 


RESTORE BYTE 






F5B1I 88 


DEY 


AND ROTATE ALL 8 






F5B2I D0F1 


BNE RAMWT2 


TIMES 






F5B4I 20 07FD 


JSR CROUT1 


CLEAR TO END OF LINE. 






F5B7I CA 


DEX 






F5B8| 10E7 


BPL RAMWT1 






F5BAI 








F5BA| 


; ZPG l STK TEST 






F5BAI 








F5BAI 9A 


TXS 






F5BBI 8C EFFF 


STY BNKSW 






F5BE| 98 


ZP1 TYA 






F5BF| 8D D0FF 


STA ZPREG 






F5C2I 85 FF 


STA STK0 






F5C4I C8 


INY 






F5C5I 98 


TYA 






FSC6I 48 


PHA 






F5C7| 68 


PLA 






F5C8| C8 


INY 






F5C9I C0 20 


CPY #20 






F5CBI D0F1 


BNE ZP1 






F5CD| A0 00 


LDY #00 






F5CFI 8C D0FF 


STY ZPREG 






F5D2| 86 18 


STX PTRLO 






F5D4I E8 


ZP2 INX 






F5D5I 86 19 


STX PTRHI 






F5D7I 8A 


TXA 






F5D8| Dl 18 


CMP (PTRLO), Y 






F5DAI D006 


BNE ZP3 






F5DCI E0 IF 


CPX #1F 






F5DEI D0F4 


BNE ZP2 






F5E0I F005 


BEQ ROMTST 






F5E2I F5E2 


ZP3 .EQU * 


CHIP IS THERE, BAD ZERO AND STACK 






F5E2I A2 1A 


LDX #1A 


SO PRINT 'ZP' MESSAGE 






F5E4I 20 7BF7 


JSR MESSERR 


i SET FLAG (2MHZ MODE) 






F5E7| 








F5E7| 


; ROM TEST ROUTINE 






F5E7| 








F5E7| A9 00 


ROMTST LDA #00 ; SET POINTERS TO 






F5E9| A8 


TAY ; $F000 






F5EA| A2 F0 


LDX #0F0 






F5ECI 85 18 


STA PTRLO 






F5EEI 8 6 19 


STX PTRHI 


SET X TO $FF 






F5F0I A2 FF 


LDX #0FF 


FOR WINDOWING I/O 






F5F2I 51 18 


ROMTST1 EOR (PTRLO) , Y 


COMPUTE CHKSUM ON 






F5F4I E4 19 


CPX PTRHI 


EACH ROM BYTE, 






F5F6I D006 


BNE ROMTST2 


WINDOW OUT 






F5F8I C0 BF 


CPY #0BF 


RANGES FFC0-FFEF 






F5FAI D002 


BNE ROMTST2 






F5FCI A0 EF 


LDY #0EF 






F5FEI C8 


ROMTST2 INY 






F5FFI D0F1 


BNE ROMTST1 






F601I E6 19 


INC PTRHI 






F603I D0ED 


BNE ROMTST 1 






F605I A8 


TAY ; TEST ACC. FOR 






F606I F005 


BEQ VIATST ; YES, NEXT TEST 






F608I A2 03 


LDX #03 ; PRINT 'ROM' AND 






F60AI 20 7BF7 


JSR MESSERR ; SET ERROR 






F60DI 








F60D| 


; VIA TEST ROUTINE 






F60DI 








F60DI 18 


VIATST CLC ; SET UP FOR ADDING BYTES 






F60EI D8 


CLD 






F60FI AD E0FF 


LDA SYSE0 


MASK OFF INPUT BITS 






F612I 29 3F 


AND #3F 


AND STORE BYTE IN 






F614I 85 18 


STA PTRLO 


TEMPOR. LOCATION 






F616| AD EFFF 


LDA BNKSW 


MASK OFF INPUT BITS 






F619I 29 4F 


AND #4F 


AND ADD TO STORED 






F61BI 65 18 


ADC PTRLO 


BYTE IN TEMP. LOC. 






F61DI 6D D0FF 


ADC ZPREG 


ADD REMAINING 






F620I 85 18 


STA PTRLO 


REGISTERS OF THE 






F622I AD DFFF 


LDA SYSD1 


VIA'S 






F625I 29 5F 


AND #5F 


(MASK THIS ONE) 






^F627| 65 18 


ADC PTRLO 


AND TEST 
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F629 


6D D2FF 


ADC SYSD2 


TO SEE 




F62C 


6D D3FF 


ADC SYSD3 


IF THEY AGREE 






F62F 


6D E2FF 


ADC SYSE2 


WITH THE RESET 






F632 


6D E3FF 


ADC SYSE3 


CONDITION. 






F635 


C9 El 


CMP #0E0+ROM 


-El? 






F637 


F00S 


BEQ AC I A 


YES, NEXT TEST 






F639 


A2 06 


LDX #06 


NO, PRINT 'VIA' MESS 






F63B 


20 7BF7 


JSR MESSERR 


AND SET ERROR FLAG 






F63E 












F63E 




; ACIA TEST 








F63E 












F63E 


18 


ACIA CLC 


SET UP FOR ADDITION 






F63F 


A9 9F 


LDA #9F 


MASK INPUT BITS 






F641 


2D F1C0 


AND AC I AST 


FROM STATUS REG 






F644 


6D F2C0 


ADC ACIACM 


AND ADD DEFAULT STATES 






F647 


6D F3C0 


ADC ACIACN 


OIF CONTROL AND COMMAND 






F64A 


C9 10 


CMP #10 


REGS. -10? 






F64C 


F005 


BEQ ATD 


YES, NEXT TEST 






F64E 


A2 09 


LDX #09 


NO, 'ACIA' MESSAGE AND 






F650 


20 7BF7 


JSR MESSERR 


THEN SET ERROR FLAG 






F653 












F653 




; A/D TEST ROUTINE 








F653 












F653 


A9 C0 


ATD LDA #0C0 








F655 


8D DCFF 


STA 0FFDC 








F656 


AD 5AC0 


LDA PDLEN+2 








F65B 


AD SEC0 


LDA PDLEN+6 








F65E 


AD 5CC0 


LDA PDLEN+4 








F661 


A0 20 


LDY #20 








F663 


88 


ADCTST1 DEY 


WAIT FOR 40 USEC 






F664 


D0FD 


BNE ADCTST1 








F666 


AD 5DC0 


LDA PDLEN+5 


SET A/D RAMP 






F669 


C8 


ADCTST3 INY 


COUNT FOR CONVERSION 






F66A 


F00A 


BEQ ADCERR 








F66C 


AD 66C0 


LDA ADTO 


IF BIT 7-1? 






F66F 


30F8 


BMI ADCTST3 


YES, CONTINUE 






F671 


98 


TYA 


NO, MOVE COUNT TO ACC 






F672 


2 9 E0 


AND #0E0 


ACC<32 






F674 


F005 


BEQ KEYPLUG 








F676 


F676 


ADCERR .EQU * 


NO, 






F676 


A2 0D 


LDX #0D 


PRINT 'A/D" MESS 






F678 


20 7BF7 


JSR MESSERR 


AND SET ERROR FLAG 






F67B 












F67B 




; KEYBOARD PLUGIN TEST 








F67B 












F67B 


AD 08C0 


KEYPLUG LDA KEYBD 


IS KYBD PLUGGED IN? 






F67E 


0A 


ASL A 


(IS LIGHT CURRENT 






F67F 


1041 


BPL SEX 


PRESENT?) NO, BRANCH 






F681 


AD DFFF 


LDA SYSD1 


IS ERROR FLAG SET? 






F684 


303C 


BMI SEX 


ERROR HANG 






F686 












F686 




; RECONFIGURE THE SYSTEM 








F686 












F686 


A9 77 


RECON LDA #77 


TURN ON SCREEN 






F688 


8D DFFF 


STA SYSD1 








F68B 


20 98FD 


JSR CLDSTRT 


INITIALIZE MONITOR AND DEFAULT CHARACTER SET 






F68E 


2C 10C0 


BIT KBDSTRB 


CLEAR KEYBOARD 






F691 


AD FFCF 


LDA EXPROM 


DISABLE ALL SLOTS 






F694 


AD 20C0 


LDA 0C020 








F697 


A9 10 


LDA #10 


TEST FOR "APPLE 1" 






F699 


2D 08C0 


AND KEYBD 








F69C 


D003 


BNE BOOT 


NO, DO REGULAR BOOT 






F69E 


20 01F9 


JSR MONITOR 


AND NEVER COME BACK 






F6A1 


A2 01 


BOOT LDX #01 


READ BLOCK 






F6A3 


86 87 


STX IBCMD 








F6A5 


CA 


DEX 








F6A6 


86 85 


STX IBBUFP 


INTO RAM AT $A000 






F6A8 


A9 A0 


LDA #0A0 








F6AA 


85 86 


STA IBBUFP+1 








F6AC 


4A 


LSR A 


FOR TRACK 80 






F6AD 


85 91 


STA PREVTRK 


MAKE IT RECALIBRATE TOO! 






F6AF 


8A 


TXA 








F6B0 


20 7 9F4 


JSR BLOCKIO 








F6B3 


900A 


BCC GOBOOT 


IF WE'VE SUCCEEDED. DO IT UP 






F6B5 


A2 1C 


LDX #1C 








F6B7 


20 38F7 


JSR STRWT 


' RETRY " 






F6BA 


20 0FFD 


JSR KEYIN 








F6BD 


B0E2 


BCS BOOT 








F6BF 


4C 00A0 


GOBOOT JMP 0A000 


GO TO IT FOOL . . . 






F6C2 












F6C2 




; SYSTEM EXCERCISER 








F6C2 












F6C2 


A0 7F 


SEX LDY #7F 


TRY FROM 






F6C4 


98 


SEX1 TYA 


S7F TO 






F6C5 


2 9 FE 


AND #0FE 


ADD.= 






F6C7 


4 9 4E 


EOR #4E 


$4E OR $4F 






F6C9 


F003 


BEQ SEX2 


YES, SKP 






F6CB 


B9 00C0 


LDA KYBD,Y 


NO, CONT 






F6CE 


88 


SEX2 DEY 


NEXT ADD 






F6CF 


D0F3 


BNE SEX1 


J 
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F6D1| AD 51C0 


LDA TXTMD ; SET TXT 




F6D4| B9 00C1 SEX3 LDA SLT1 , Y 


EXCERCISE 






F6D7I B9 00C2 


LDA SLT2,Y 


ALL 






F6DAI B9 00C3 


LDA SLT3,Y 


SLOTS 






F6DD| B9 00C4 


LDA SLT4 , Y 






F6E0I AD FFCF 


LDA EXPROM ; DISABLE EXPANSION ROM AREA 






F6E3I C8 


INY 






F6E4| D0EE 


BNE SEX3 






F6E6I 








F6E6I 


RAM TEST ROUTINE 






F6E6I 








F6E6| A9 73 USRENTRY LDA #72+ROM 






F6E8| 8D DFFF 


STA SYSD1 






F6EBI A9 18 


LDA #18 






F6EDI 8D D0FF 


STA ZPREG 






F6F0I A9 00 


LDA #00 






F6F2 | A2 07 


LDX #07 






F6F4| 95 10 RAMTST0 STA ZRPG1,X 






F6F6I CA 


DEX 






F6F7I 10FB 


BPL RAMTST0 






F6F9I 20 84F7 


JSR RAMSET 






F6FCI 08 


PHP 






F6FDI 20 F6F7 RAMTST1 JSR RAMWT 






F700| 20 F6F7 


JSR RAMWT 






F703| 28 


PLP 






F704 1 6A 


ROR A 






F705I 08 


PHP 






F706| 20 A1F7 


JSR PTRINC 






F709| D0F2 


BNE RAMTST1 






F70BI 20 84F7 


JSR RAMSET 






F70EI 08 


PHP 






F70FI 20 FAF7 RAMTST4 JSR RAMRD 






F712I 48 


PHA 






F713| A9 00 


LDA #00 






F715I 91 18 


STA (PTRLO),Y 






F717| 68 


PLA 






F718I 28 


PLP 






F719I 6A 


ROR A 






F71AI 08 


PHP 






F71BI 20 A1F7 


JSR PTRINC 






F71E| D0EF 


BNE RAMTST4 






F720I 








F720I 


RETURN TO START 






F720I 








F720I A9 00 


LDA #00 






F722I 8D EFFF 


STA BNKSW 






F725| 8D D0FF 


STA ZPREG 






F728I A2 07 


LDX #07 






F72AI BD 1018 RAMTST6 LDA PHPR,X 






F72DI 95 10 


STA ZRPG1,X 






F72FI CA 


DEX 






F730| 10F8 


BPL RAMTST6 






F732I 20 7EF7 


JSR ERROR 






F735I 4C 75F5 


JMP ERRLP 






F738I 








F738| 


****************************** 






F738| 


SARA TEST SUBROUTINES 






F738I 


****************************** 






F738I 








F738I BD CDF4 STRWT LDA CHPG,X 






F73B| 48 


PHA 






F73CI 09 80 


ORA #80 


NORMAL VIDEO 






F73EI 20 25FC 


JSR COUT 


S PRINT 






F741I E8 


INX 


NXT 






F742I 68 


PLA 


CHR 






F743I 10F3 


BPL STRWT 






F745I 4C 07FD 


JMP CROUT1 ; CLR TO END OF LINE 






F748I 








F748I 


SUBROUTINE RAM 






F748I 








F748I 48 I 


<AM PHA 


SV ACC 






F749I 8A 


TXA 


CONVRT 






F74AI 4A 


LSR A 


ADD TO 






F74BI 4A 


LSR A 


USE FOR 






F74CI 4A 


LSR A 


• 8 ENTRY 






F74DI 4A 


LSR A 






F74EI 08 


PHP 






F74FI 4A 


LSR A 






F750I 28 


PLP 






F751I AA 


TAX 


• LOOKUP 






F752I BD C5F4 


LDA RAMTBL,X 


• IF VAL 






F755I 1014 


BPL RAM0 


■ <0, GET 






F757I 48 


PHA 


■ WHICH 






F758I AD EFFF 


LDA BNKSW 






F75BI 2 9 0F 


AND #0F 






F75D| AA 


TAX 






F75E| 68 


PLA 






F75FI E0 00 


CPX #00 






F761I F013 


BEQ RAMI ; BANK? 






F763I 4A 


LSR A ; SET 
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F764I 4A 


LSR A ; PROPER 




F765| 4A 


LSR A ; RAM 






F766| CA 


DEX ; VAL 






F767 I D00D 


BNE RAMI 






F769I 2 9 05 


AND #05 ; CONVERT 






F7 6BI D009 


RAM0 BNE RAMI ; TO VAL 






F76DI 8A 


TXA 






F76EI F002 


BEQ RAM00 






F770I A9 03 


LDA #03 






F772| 9002 


RAM00 BCC RAMI 






F774| 49 03 


EOR #03 






F776| 29 07 


RAMI AND #07 ; BANKSW 






F778I AA 


TAX 






F779I 68 


PLA 






F77AI 60 


RTS 






F77B| 








F77BI 


; SUBROUTINE ERROR 






F77BI 








F77BI 20 38F7 


MESSERR JSR STRWT ; PRINT MESSAGE FIRST 






F77E| A9 F3 


ERROR LDA #0F2+ROM ; SET 1 






F780I 8D DFFF 


STA SYSD1 ; MHZ MO 






F783I 60 


RTS 






F784I 








F784I 


• SUBROUTINE RAMSET 






F784I 








F784I A2 01 


RAMSET LDX #01 






F786| 86 1A 


STX BNK 






F788I A0 00 


LDY #00 






F78AI A9 AA 


LDA #0AA 






F78CI 38 


SEC 






F78DI 48 


RAMSET1 PHA 






F78EI 08 


PHP 






F78FI A5 1A 


LDA BNK 






F791I 09 80 


ORA #80 






F793I 8D 1914 


STA IBNK 






F796| A9 02 


LDA #02 






F798| 85 19 


STA PTRHI 






F7 9A| A2 00 


LDX #00 






F79CI 86 18 


STX PTRLO 






F79EI 28 


PLP 






F79FI 68 


PLA 






F7A0I 60 


RTS 






F7A1I 








F7A1I 


; SUBROUTINE PTRINC 






F7A1I 








F7A1I 48 


PTRINC PHA 






F7A2I E6 18 


INC PTRLO 






F7A4I D01D 


BNE RETS 






F7A6I A5 1A 


LDA BNK 






F7A8I 100E 


BPL PINC1 






F7AAI A5 19 


LDA PTRHI 






F7ACI C9 13 


CMP #13 






F7AEI F006 


BEQ PINC2 






F7B0I C9 17 


CMP #17 






F7B2 1 D004 


BNE PINC1 






F7B4I E6 19 


INC PTRHI 






F7B6I E6 19 


PINC2 INC PTRHI 






F7B8| E6 19 


PINC1 INC PTRHI 






F7BAI D007 


BNE RETS 






F7BCI C6 1A 


DEC BNK 






F7BEI C6 1A 


DEC BNK 






F7C0I 20 8DF7 


JSR RAMSET1 






F7C3I 68 


RETS PLA 






F7C4I A6 1A 


LDX BNK 






F7C6| E0 FD 


CPX #0FD 






F7C8I 60 


RTS 






F7C9I 








F7C9I 


; SUBROUTINE RAMERR 






F7C9I 








F7C9I 48 


RAMERR PHA 






F7CAI A6 19 


LDX PTRHI 






F7CCI A4 1A 


LDY BNK 






F7CEI 3019 


BMI RAMERR4 






F7D0I 8A 


TXA 






F7D1 | 301D 


BMI RAMERR5 






F7D3| 18 


CLC 






F7D4| 69 20 


ADC #20 






F7D6I 8C EFFF 


RAMERR2 STY BNKSW 






F7D9I AA 


TAX 






F7DAI 20 48F7 


RAMERR3 JSR RAM 






F7DD| 68 


PLA 






F7DE| 4 8 


PHA 






F7DFI A0 00 


LDY #00 






F7E1| 51 18 


EOR (PTRLO) , Y 






F7E3I 15 10 


ORA ZRPG1 , X 






F7E5I 95 10 


STA ZRPG1.X 






F7E7I 68 


PLA 






F7E8| 60 


RTS 






F7E9I A9 00 


RAMERR4 LDA #00 






F7EBI 8D EFFF 


STA BNKSW j 
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F7EEI 
F7F0I 
F7F1I 
F7F3I 
F7F4I 
F7F6I 
F7F6I 
F7F6I 
F7F6I 
F7F8| 
F7FAI 
F7FCI 
F7FE| 
F7FF| 
F7FFI 



F0EA 
38 

E9 60 
C8 
D0E0 



4 9 FF 
91 18 
Dl 18 
D0CB 
60 





BEQ 


RAMERR3 




RAMERR5 


SEC 








SBC 


#60 






INY 








BNE 


RAMERR2 




; SUBROUTINE RAMWT 






RAMWT 


EOR 


#0FF 






STA 


(PTRLO) 


y 


RAMRD 


CMP 


IPTRLO) 


Y 




BNE 


RAMERR 




RET1 


RTS 







.END 



SYMBOL TABLE DUMP 



AB - Absolute 
RF - Ref 
PB - Public 



LB - Label UD 
DF - Def PR 
PV - Private CS 



ACIA 

ADCTST1 

BLOCKIO 

CLDSTRT 

DISK1 

EXPROM 

IBNK 

KYBD 

NOGOOD 

PHPR 

PTRINC 

RAM00 

RAMERR4 

RAMTBL 

RAMWT 

RET1 

ROMTST2 

SEX1 

SLT3 

SYSD2 

TXTMD 

ZP3 



LB F63E 
LB F663 
AB F479 
AB FD98 
LB F513 
AB CFFF 
AB 1419 
AB C000 
LB F52A 
AB 1810 
LB F7A1 
LB F772 
LB F7E9 
LB F4C5 
LB F7F6 
LB F7FE 
LB F5FE 
LB F6C4 
AB C300 
AB FFD2 
AB C051 
LB F5E2 



ACIACM 

ADCTST3 

BNK 

CNTWR 

DISKOFF 

GOBOOT 

KBDSTRB 

MESSERR 

NOMEM 

PINC1 

PTRLO 

RAMI 

RAMERR 5 

RAMTST0 

RAMWT 1 

RETS 

SARATEST PR 

SEX 2 LB 

SLT4 AB 

SYSD3 AB 

USRENTRY LB 

ZPREG AB 



C0F2 
F669 
001A 
F532 
C0D0 
F6BF 
C010 
F77B 
F548 
F7B8 
0018 
F776 
F7F0 
F6F4 
F5A1 
F7C3 

F6CE 
C400 
FFD3 
F6E6 
FFD0 



Undefined 

Proc 

Consts 

ACIACN 

ADRS 

BNKSW 

COUT 

ERRLP 

GRMD 

KEYBD 

MONITOR 

NXBIT 

PINC2 

PULBT 

RAMERR 

RAMRD 

RAMTST1 

RAMWT 2 

ROM 

SETCVH 

SEX3 

STK0 

SYSE0 

VIATST 

ZRPG 



MC 
FC 



Macro 
Func 



AB C0F3 
AB C04 7 
AB FFEF 
AB FC25 
LB F575 
AB C050 
AB C008 
AB F901 
LB F52 6 
LB F7B6 
LB F53A 
LB F7C9 
LB F7FA 
LB F6FD 
LB F5A5 
AB 0001 
AB FBC7 
LB F6D4 
AB 00FF 
AB FFE0 
LB F60D 
AB 0000 



ACIAST 

ADTO 

BOOT 

CROUT1 

ERRLP 1 

IBBUFP 

KEY IN 

NMEM1 

NXBYT 

PREVTRK 

RAM 

RAMERR2 

RAMSET 

RAMTST4 

RAMWT 4 

ROMTST 

SETUP 

SLT1 

STRWT 

SYSE2 

ZP1 

ZRPG1 



AB C0F1 
AB C066 
LB F6A1 
AB FD07 
LB FS93 
AB 0085 
AB FD0F 
LB F54F 
LB F524 
AB 0091 
LB F748 
LB F7D6 
LB F784 
LB F70F 
LB F5AD 
LB F5E7 
AB FD9D 
AB C100 
LB F738 
AB FFE2 
LB F5BE 
AB 0010 



ADCERR 

ATD 

CHPG 

CV 

ERROR 

IBCMD 

KEYPLUG 

NMEM2 

PDLEN 

PTRHI 

RAM0 

RAMERR3 

RAMSET1 

RAMTST6 

RECON 

ROMTST1 

SEX 

SLT2 

SYSD1 

SYSE3 

ZP2 



LB F676 
LB F653 
LB F4CD 
AB 005D 
LB F77E 
AB 0087 
LB F67B 
LB F562 
AB C058 
AB 0019 
LB F76B 
LB F7DA 
LB F78D 
LB F72A 
LB F686 
LB F5F2 
LB F6C2 
AB C200 
AB FFDF 
AB FFE3 
LB F5D4 



Assembly complete: 545 lines 
Errors flagged on this Assembly 



6502 OPCODE STATIC FREQUENCIES 



ADC 


10 


1 


********** 


AND 


12 


1 


************ 


ASL 


3 


1 


* * * 


BCC 


3 


1 


*** 


BCS 


1 


m 


* 


BEQ 


12 


1 


************ 


BIT 


1 


m 


* 


BMI 


4 


1 


* * * * 


BNE 


31 


1 


********************** 


BPL 


9 


1 


********* 


CLC 


3 


1 


** * 


CLD 


1 


m 


* 


CMP 


10 


1 


********** 


CPX 


5 


1 


***** 


CPY 


2 


1 


** 


DEC 


3 


1 


*** 


DEX 


9 




********* 


DEY 


5 


1 


***** 


EOR 


5 


1 


***** 


INC 


6 


1 


****** 


I NX 


6 


1 


****** 


INY 


6 


1 


****** 


JMP 


4 


1 


** ** 


JSR 


29 


1 


********************** 


LDA 


56 


M 


********************** 


LDX 


24 


1 


********************** 


LDY 


10 


1 


********** 


LSR 


9 


1 


********* 


ORA 


3 


1 


** * 


PHA 


11 


1 


*********** 


PHP 


6 


1 


****** 


PLA 


12 


1 


************ 


PLP 


4 


1 


* * * * 


ROR 


2 


1 


* * 


RTS 


6 


1 


****** 


SBC 


1 


m 


* 



************* 
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SEC 


2 1 


STA 


30 | 


STX 


18 | 


STY 


4 1 


TAX 


4 1 


TAY 


2 1 


TXA 


6 1 


TXS 


2 1 


TYA 


4 1 



** 

****************************** 

****************** 

* * ** 



Minimum frequency = 
Maximum frequency = 



1 
56 



Average frequency = 8 

Unused opcodes: 

BRK BVC BVS CLI CLV NOP ROL RTI SED SEI TSX 

Program opcode usage: 80 % 



(1.00) That's all, Folks 
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00001 


4*4*****4**44**4**4***********4*********44*****4*4***4 




00001 


4 APPLE /// ROM - MONITOR 






0000J 
00001 


4 COPYRIGHT 1979 BY APPLE COMPUTER, INC. 

4*44*4**44*44444*44*4444444*44444*44**4****44*44*4*4*4 






00001 








00001 


.ABSOLUTE 






00001 


.PROC MONITOR 






00001 


.ORG 0F7FE 






F7FE| 








F7FEI 








F7FEI 60 RET1 RTS 






F7FFI 3F 


.BYTE 03F 






F800I E9 01 


SBC #01 






F802I F0FA 


BEQ RET1 






F804| E9 01 


SBC #01 






F806| F0F6 


BEQ RET1 






F808I E9 01 


SBC #01 






F80AI F0F2 


BEQ RET1 






FB0CI E9 01 


SBC #01 






F80EI F0EE 


BEQ RET1 






F810I E9 01 


SBC #01 






F812| F0EA 


BEQ RET1 






F814I E9 01 


SBC #01 






F816I F0E6 


BEQ RET1 






F818I E9 01 


SBC #01 






F81A| F0E2 


BEQ RET1 






F81CI E9 01 


SBC #01 






F81EI F0DE 


BEQ RET1 






F820I E9 01 


SBC #01 






F822I F0DA 


BEQ RET1 






F824I E9 01 


SBC #01 






F826I F0D6 


BEQ RET1 






F828] E9 01 


SBC #01 






F82A| F0D2 


BEQ RET1 






F82CI E9 01 


SBC #01 






F82EI F0CE 


BEQ RET1 






F830I E9 01 


SBC #01 






F832I F0CA 


BEQ RET1 






F834I E9 01 


SBC #01 






F836I F0C6 


BEQ RET1 






F838| E9 01 


SBC #01 






F83A| F0C2 


BEQ RET1 






F83C| E9 01 


SBC #01 






FB3EI F0BE 


BEQ RET1 






F840I E9 01 


SBC #01 






F842I F0BA 


BEQ RET1 






FB44| E9 01 


SBC #01 






F84 6I F0B6 


BEQ RET1 






F848I E9 01 


SBC #01 






F84AI F0B2 


BEQ RET1 






F84CI E9 01 


SBC #01 






F84EI F0AE 


BEQ RET1 






F850I E9 01 


SBC #01 






F852I F0AA 


BEQ RET1 






F854I E9 01 


SBC #01 






F856I F0A6 


BEQ RET1 






F858I E9 01 


SBC #01 






F85AI F0A2 


BEQ RET1 






F85C| E9 01 


SBC #01 






F85EI F09E 


BEQ RET1 






F860I E9 01 


SBC #01 






PB62 | F09A 


BEQ RET1 






FB64| E9 01 


SBC #01 






F866| F096 


BEQ RET1 






F868I E9 01 


SBC #01 






F86AI F092 


BEQ RET1 






F86C| E9 01 


SBC #01 






F86EI F08E 


BEQ RET1 






F870I E9 01 


SBC #01 






F872I F08A 


BEQ RET1 






F874I E9 01 


SBC #01 






F876I F086 


BEQ RET1 






F878I E9 01 


SBC #01 






F87AI F082 


BEQ RET1 






F87CI E9 01 


SBC #01 






F87E! F002 


BEQ RET3 






F880I E9 01 


SBC #01 






F882I F07C 


RET 3 BEQ RET2 






F884| E9 01 


SBC #01 






F886I F078 


BEQ RET2 






F888I E9 01 


SBC #01 






F88AI F074 


BEQ RET2 






F88CI E9 01 


SBC #01 






F88EI F070 


BEQ RET2 






F890| E9 01 


SBC #01 






F892I F06C 


BEQ RET2 






F894I E9 01 


SBC #01 






F896I F068 


BEQ RET2 






F898I E9 01 


SBC #01 






F89AI F064 


BEQ RET2 
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F89C| E9 01 




SBC #01 




F89EI F060 




BEQ RET2 






F8A0I E9 01 




SBC #01 






F8A2I F05C 




BEQ RET 2 






F8A4I E9 01 




SBC #01 






F8A6I F058 




BEQ RET2 






F8A8I E9 01 




SBC #01 






F8AAI F054 




BEQ RET2 






F8ACI E9 01 




SBC #01 






F8AEI F050 




BEQ RET2 






F8B0I E9 01 




SBC #01 






F8B2I F04C 




BEQ RET2 






F8B4 I E9 01 




SBC #01 






F8B6| F04 8 




BEQ RET2 






F8B8I E9 01 




SBC #01 






F8BAI F044 




BEQ RET 2 






F8BC| E9 01 




SBC #01 






F8BEI F040 




BEQ RET2 






F8C0I E9 01 




SBC #01 






F8C2 I F03C 




BEQ RET2 






F8C4I E9 01 




SBC #01 






F8C6| F038 




BEQ RET2 






F8C8I E9 01 




SBC #01 






F8CAI F034 




BEQ RET2 






F8CCI E9 01 




SBC #01 






F8CEI F030 




BEQ RET2 






F8D0I E9 01 




SBC #01 






F8D2I F02C 




BEQ RET2 






F8D4 I E9 01 




SBC #01 






F8D6I F02 8 




BEQ RET2 






F8D8I E9 01 




SBC #01 






F8DA| F024 




BEQ RET2 






F8DCI E9 01 




SBC #01 






F8DEI F020 




BEQ RET2 






F8E0I E9 01 




SBC #01 






F8E2I F01C 




BEQ RET2 






F8E4I E9 01 




SBC #01 






F8E6I F018 




BEQ RET2 






F8E8I E9 01 




SBC #01 






F8EAI F014 




BEQ RET2 






F8ECI E9 01 




SBC #01 






F8EEI F010 




BEQ RET2 






F8F0I E9 01 




SBC #01 






F8F2 I F00C 




BEQ RET2 






F8F4I E9 01 




SBC #01 






F8F6I F008 




BEQ RET2 






F8F8I E9 01 




SBC #01 






F8FAI F004 




BEQ RET2 






F8FCI E9 01 




SBC #01 






F8FEI F000 




BEQ RET2 






F900I 60 


RET 2 


RTS 






F901I 


■ 








F901I 










F901I 0058 


SCRNLOC 


.EQU 58 






F901I 


; 








F901I 0058 


LMARGIN 


.EQU SCRNLOC 






F901I 0059 


RMARGIN 


.EQU SCRNLOC+1 






F901| 005A 


WINTOP 


.EQU SCRNLOC+2 






F901I 005B 


WINBTM 


.EQU SCRNLOC+3 






F901 I 005C 


CH 


.EQU SCRNLOC+4 






F901 | 005D 


CV 


.EQU SCRNLOC+5 






F901I 005E 


BAS4L 


.EQU SCRNLOC+6 






F901 ] 005F 


BAS4H 


.EQU SCRNLOC+7 






F901 I 0060 


BAS8L 


.EQU SCRNLOC+8 






F901| 0061 


BAS8H 


.EQU SCRNLOC+9 






F901I 0058 


TBAS4L 


.EQU SCRNLOC+A 






F901I 0063 


TBAS4H 


.EQU SCRNLOC+0B 






F901I 0064 


TBAS8L 


.EQU SCRNLOC+0C 






F901I 0065 


TBAS8H 


.EQU SCRNLOC+0D 






F901I 0066 


FORGND 


.EQU SCRNLOC+0E 






F901I 0067 


BKGND 


.EQU SCRNLOC+0F 






F901I 0068 


MODES 


.EQU SCRNLOC+10 






F901I 0069 


CURSOR 


.EQU SCRNLOC+11 






F901I 006A 


STACK 


.EQU SCRNLOC+1 2 






F901| 006B 


PROMPT 


.EQU SCRNLOC+1 3 






F901I 006C 


TEMPX 


.EQU SCRNLOC+1 4 






F901I 006D 


TEMPY 


.EQU SCRNLOC+1 5 






F901| 006E 


CSWL 


.EQU SCRNLOC+1 6 






F901| 006F 


CSWH 


.EQU SCRNLOC+1 7 






F901I 0070 


KSWL 


.EQU SCRNLOC+1 8 






F901I 0071 


KSWH 


.EQU SCRNLOC+19 






F901t 0072 


PCL 


.EQU SCRNLOC+1A 






F901I 0073 


PCH 


.EQU SCRNLOC+1B 






F901I 0074 


AIL 


.EQU SCRNLOC+1C 






F901I 0075 


A1H 


.EQU A1L+1 






F901I 007 6 


A2L 


.EQU A1L+2 






F901I 0077 


A2H 


.EQU A1L+3 






F901| 0078 


A3L 


.EQU A1L+4 






F901I 007 9 


A3H 


.EQU A1L+5 






F901I 007A 


A4L 


.EQU A1L+6 , 
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F901 I 007B 


A4H 


.EQU A1L+7 




F901I 007C 


STATE 


.EQU A1L+8 






F901I 007 D 


YSAV 


.EQU A1L+9 






F901I 007E 


INBUF 


.EQU A1L+0A 






F901| 0080 


TEMP 


.EQU A1L+0C 






F901I 0069 


MASK 


.EQU CURSOR 






F901I 


j 








F901 | C000 


KBD 


.EQU 0C000 






F901| C010 


KBDSTRB 


.EQU 0C010 






F901I 










F901I 0358 


USERADR 


.EQU 358 






F901I F4 7 9 


BLOCK 10 


.EQU 0F479 






F901I F686 


RECON 


.EQU 0F686 ; AS OF 12/20/1979 






F901| F4EE 


DIAGN 


.EQU 0F4EE 






F901I 0050 


INBUFLEN 


.EQU 50 ; ONLY 80 BYTES ($3A0-$3EF) 






F901| 0081 


IBSLOT 


.EQU 81 






F901| 0082 


IBDRVN 


.EQU IBSLOT+1 






F901I 0085 


IBBUFP 


-EQU IBSLOT+4 






F901I 008 7 


IBCMD 


.EQU IBSLOT+6 






F901I 


; 








F901| F901 


ENTRY 


.EQU * 






F901 I BA 




TSX 






F902I 86 6A 




STX STACK 






F904| D8 


MON 


CLD ; MUST BE HEX MODE 






F905I 20 4EFC 




JSR BELL 






F908| A6 6A 


MONZ 


LDX STACK ; RESTORE STACK TO ORIGINAL LOCATION 






F90AI 9 A 




TXS 






F90BI A9 DF 




LDA #0DF ; PROMPT (APPLE) FOR SARA MONITOR 






F90DI 85 6B 




STA PROMPT 






F90FI 20 D5FC 




JSR GETLNZ ; GET A LINE OF INPUT 






F912I 20 67F9 


SCAN 


JSR ZSTATE ; SET REGULAR SCAN 






F915I 20 2CF9 


NXTINP 


JSR GETNUM ; ATTEMPT TO READ HEX BYTE 






F918I 84 7D 




STY YSAV ; STORE CURRENT INPUT POINTER 






F91A] A0 12 




LDY #12 ; 18 COMMANDS 






F91CI 88 


CMDSRCH 


DEY 






F91DI 30E5 




BMI MON ; GIVE DP IF UNRECOGNIZABLE 






F91FI D9 6CF9 




CMP CMDTAB, Y ; FOUND? 






F922I D0F8 




BNE CMDSRCH ; NO KEEP LOOKING 






F924I 20 5EF9 




JSR TOSUB ; PERFORM FUNCTION 






F927I A4 7D 




LDY YSAV ; GET NEXT POINTER 






F929I 4C 15F9 




JMP NXTINP ; DO NEXT COMMAND 






F92CI 


; 








F92CI A2 00 


GETNUM 


LDX #00 ; CLEAR A2 






F92EI 86 76 




STX A2L 






F930I 86 77 




STX A2H 






F932I Bl 7E 


NXTCHR 


LDA (INBUF), Y 






F934I C8 




INY ; BUMP INDEX FOR NEXT TIME 






F935I 49 B0 




EOR #0B0 






F937I C9 0A 




CMP #0A ; TEST FOR DIGIT 






F939I 9006 




BCC DIGIT ; SAVE IT IF 1-9 






F93BI 69 88 




ADC #88 ; TEST FOR HEX A-F 






F93DI C9 FA 




CMP #0FA 






F93FI 902A 




BCC DIGRET 






F941I A2 03 


DIGIT 


LDX #03 






F94 3| 0A 




ASL A 






F94 4I 0A 




ASL A 






F94 5I 0A 




ASL A 






F94 6I 0A 




ASL A 






F94 7I 0A 


NXTBIT 


ASL A ; SHIFT HEX DIGITS INTO A2 






F948I 26 76 




ROL A2L 






F94AI 26 77 




ROL A2H 






F94C| CA 




DEX 






F94DI 10F8 




BPL NXTBIT ; SHIFTED ALL YET? 






F94FI A5 7C 


NXTBAS 


LDA STATE 






F951I D006 




BNE NXTBS2 ; IF ZERO THEN COPY TO Al , 3 






F953I B5 77 




LDA A2H,X 






F955I 95 75 




STA A1H,X 






F957I 95 79 




STA A3H,X 






F959| E8 


NXTBS2 


I NX 






F95AI F0F3 




BEQ NXTBAS 






F95CI D0D4 




BNE NXTCHR 






F95E| 










F95EI 


; SWITCH 


ROUTINE FOR CHARACTER 






F95EI 










F95E| A9 FA 


TOSUB 


LDA #0FA ; PUSH ADDRESS OR FUNCTION 






F960I 48 




PHA ; AND RETURN IT 






F961| B9 7DF9 




LDA CMDVEC,Y 






F964I 48 




PHA 






F965I A5 7C 




LDA STATE ; PASS MODE VIA ACC. 






F967| A0 00 


ZSTATE 


LDY #00 






F969I 84 7C 




STY STATE ; RESET STATE OF SCAN 






F96BI 60 


DIGRET 


RTS 






F96CI F96C 


CMDTAB 


.EQU * 






F96CI 00 




.BYTE 00 


G =GP (CALL) SUBROUTINE 






F96D| 03 




.BYTE 03 


J =JUMP (CONT) PROGRAM 






F96E| 06 




.BYTE 06 


M =MOVE MEMORY 






F96FI EB 




.BYTE 0EB 


R -READ DISK BLOCK 






F970I EC 




.BYTE 0EC 


S -MEMORY SEARCH 






F971I EE 




.BYTE 0EE 


U =USER FUNCTION 






F972| EF 




.BYTE 0EF 


V ^VERIFY MEMORY BLOCKS , 
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F973I F0 




.BYTE 0F0 


W =WRITE DISK BLOCK 




F974 I Fl 




.BYTE 0F1 


X =REPEAT COMMAND LINE 






F975I 99 




.BYTE 99 


SP =SPACE (BYTE SEPARATOR) 






F976I 9B 




.BYTE 9B 


=ASCII (HI BIT ON) 






F977| A0 




-BYTE 0A0 


• =ASCII (HI BIT OFF) 






F978I 93 




.BYTE 93 


: =SET STORE MODE 






F979I A7 




.BYTE 0A7 


=RANGE SEPARATOR 






F97A| A8 




.BYTE 0A8 


/ "COMMAND SEPARATOR 






F97BI 95 




.BYTE 95 


< -DEST/ SOURCE SEPARATOR 






F97CI C6 




.BYTE 0C6 


CR -CARRIAGE RETURN 






F97DI 


■ 










F97DI F97D 


CMDVEC 


.EQU * 








F97DI 90 




.BYTE 90 


GO-1 






F97EI 8E 




.BYTE 8E 


JUMP-1 






F97FI 3F 




.BYTE 3F 


MOVE-1 






F980| D3 




.BYTE 0D3 


READ-1 






F981I 08 




.BYTE 08 


SEARCH-1 






F982| 8B 




.BYTE 8B 


USER-1 






F983I 4E 




.BYTE 4E 


VRFY-1 






F984| D6 




.BYTE 0D6 


WRTE-1 






F985| 2C 




.BYTE 2C 


REPEAT- 1 






F986I B7 




.BYTE 0B7 


SPCE-1 






F987| 1A 




.BYTE 1A 


ASCII-1 






F988| 1C 




.BYTE 1C 


ASCI I 0-1 






F989I CB 




.BYTE 0CB 


SETMODE-1 






F98AI CB 




.BYTE 0CB 


SETMODE-1 






F98BI AD 




.BYTE 0AD 


SEP-1 






F98CI A4 




.BYTE 0A4 


DEST-1 






F98DI 39 




.BYTE 3 9 


CRMON-1 






F98EI 












F98EI 


; 










F98EI E6 7A 


NXTA4 


INC A4L 


BUMP 16 BIT POINTERS 






F990I D002 




BNE NXTA1 








F992I E6 7B 




INC A4H 








F994| E6 74 


NXTA1 


INC AIL 


BUMP Al 






F996I D005 




BNE TSTA1 








F998I E6 75 




INC A1H 








F99AI 38 




SEC 


IN CASE OF ROLL OVER 






F99B| F010 




BEQ RETA1 








F99DI A5 74 


TSTA1 


LDA AIL 








F99FI 38 




SEC 








F9A0I E5 76 




SBC A2L 








F9A2I 85 80 




STA TEMP 








F9A4I A5 75 




LDA A1H 








F9A6I E5 77 




SBC A2H 








F9A8I 05 80 




ORA TEMP 








F9AAI D001 




BNE RETA1 


IF Al LESS THAN OR EQUAL TO A2 






F9ACI 18 




CLC 


THEN CARRY CLEAR ON RETURN 






F9ADI 60 


RETA1 


RTS 








F9AEI 


- 










F9AE| 


; 










F9AE| 48 


PRBYTE 


PHA 


SAVE LOW NIBBLE 






F9AF| 4A 




LSR A 








F9B0I 4A 




LSR A 


SHIFT HI NIBBLE TO PRINT. 






F9B1I 4A 




LSR A 








F9B2I 4A 




LSR A 








F9B3I 20 B9F9 




JSR PRHEXZ 








F9B6I 68 




PLA 








F9B7| 29 0F 


PRHEX 


AND #0F 


STRIP HI NIBBLE 






F9B9I 09 B0 


PRHEXZ 


ORA #0B0 


MAKE IT NUMERIC 






F9BBI C9 BA 




CMP #0BA 


IS IT >'9' 






F9BD| 9002 




BCC PRHEX2 








F9BFI 69 06 




ADC #06 


MAKE IT "A'-'F" 






F9C1I 4C 39FC 


PRHEX2 


JMP COUT 








F9C4| 


■ 










F9C4 I 20 AEF9 


PRBYCOL 


JSR PRBYTE 








F9C7I 












F9C7I A9 BA 


PRCOLON 


LDA #0BA 


PRINT A COLON 






F9C9I D0F6 




BNE PRHEX2 


BRANCH ALWAYS 






F9CBI 


; 










F9CBI A9 07 


TST80WID 


LDA #07 


ANTICIPATE 






F9CD| 24 68 




BIT MODES 


TEST FOR 80 






F9CF| 5002 




BVC SVMASK 








F9D1I A9 0F 




LDA #0F 








F9D3I 85 69 


SVMASK 


STA MASK 








F9D5! 60 




RTS 








F9D6I 












F9D6I 8A 


A1PC 


TXA 


TEST FOR NEW PC 






F9D7I F007 




BEQ OLDPC 








F9D9I B5 74 


A1PC1 


LDA A1L,X 








F9DBI 95 72 




STA PCL,X 








F9DDI CA 




DEX 








F9DEI 10F9 




BPL A1PC1 








F9E0I 60 


OLDPC 


RTS 








F9E1| 












F9E1I 85 69 


ASCI 11 


STA MASK 


SAVE HI BIT STATUS 






F9E3I A4 7D 


ASCII2 


LDY YSAV 


MOVE ASCII TO MEMORY 






F9E5t Bl 7E 




LDA (INBUF) , Y 








F9E7I E6 7D 




INC YSAV 


BUMP FOR NEXT THING. 






F9E9I A0 00 




LDY #00 


J 
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F9EBI C9 A2 




CMP #0A2 ; ASCII " ? 




F9EDI D005 




BNE ASCI I 3 ; NOPE, CONTINUE. 






F9EFI A5 69 




LDA MASK 






F9F1I 1032 




BPL BITON ,- HE'S CHANGED MODES. 






F9F3I 60 




RTS 






F9F4I C9 A7 


ASCII3 


CMP #0A7 ; ASCII ' ? 






F9F6I D005 




BNE CRCHK ; NO, TEST FOR EOL. 






F9F8I A5 69 




LDA MASK 






F9FA| 302 D 




BMI BITOFF ; CHANGE MODES. 






F9FCI 60 




RTS 






F9FDI 










F9FDI C9 8D 


CRCHK 


CMP #8D ; END OF LINE? 






F9FFI F007 




BEQ ASCDONE ; YES, FINISHED 






FA01I 25 69 




AND MASK 






FA03I 20 C3FA 




JSR STOR1 ; GO STORE IT! 






FA06I D0DB 




BNE ASCI 12 ; DO NEXT. 






FA08I 60 


ASCDOKE 


RTS 






FA09I 


; 








FA09| 










FA09I Bl 74 


SEARCH 


LDA (A1L),Y ; LOAD SEARCH BYTE 






FA0BI C5 7A 




CMP A4L 






FA0DI D006 




BNE SRCH1 






FA0F| 20 75FA 




JSR PRINTA1 ,- DUMP MEMORY 






FA12I 20 EFFC 




JSR CROUT 






FA15I 20 94F9 


SRCH1 


JSR NXTA1 ; INCREMENT POINTER 






FA18I 90EF 




BCC SEARCH ; CONTINUE SEARCH 






FA1A| 60 




RTS ; RETURN 






FA1BI 


- 








FA1BI 










FA1BI 38 


ASCII 


SEC ; INDICATE HI ON. 






FA1C| 90 




.BYTE 90 ; (BCC - NEVER TAKEN) 






FAlDt 18 


ASCII0 


CLC ; INDICATE HI OFF 






FA1EI AA 


CKMDE 


TAX ; SAVE STATE 






FA1FI 8 6 7C 




STX STATE ; RETAIN STATE 






FA21 | 49 BA 




EOR #0BA ; ARE WE IN STORE MODE? 






FA23I D07D 




BNE ERROR 






FA25I A9 FF 


BITON 


LDA #0FF ,- SET HI BIT UNMASKED 






FA27| B0B8 




BCS ASCI 11 






FA2 9| A9 7F 


B I TOFF 


LDA #7F ; MASK HI BIT 






FA2BI 10B4 




BPL ASCI 11 ; ALWAYS BRANCHES 






FA2DI 2C 00C0 


REPEAT 


BIT KBD ; REPEAT UNTIL KEYPRESS 






FA30I 1003 




BPL REPEAT 1 






FA32| 4C 0FFD 




JMP KEYIN 






FA35| 68 


REP EAT 1 


PLA ; CLEAN UP STACK 






FA36I 68 


LFA36 


PLA 






FA37| 4C 12F9 




JMP SCAN 






FA3AI 


• 








FA3AI 


; 








FA3AI 20 B4FA 


CRMON 


JSR BL1 






FA3DI 4C 08F9 




JMP MONZ 






FA40I 


; 








FA40I 


• 








FA40| 20 9DF9 


MOVE 


JSR TSTA1 ; TEST VALID RANGE 






FA4 3| B05D 




BCS ERROR 






FA45I Bl 74 


MOVNXT 


LDA (AIL) , Y ; COMPARE BYTE FOR BYTE 






FA47I 91 7A 




STA (A4L),Y 






FA4 9I 20 8EF9 




JSR NXTA4 ; BUMP BOTH Al AND A4 






FA4CI 90F7 




BCC MOVNXT 






FA4E I 60 




RTS ; ALL DONE WITH MOVE 






FA4FI 


; 








FA4FI 










FA4FI 20 9DF9 


VRFY 


JSR TSTA1 ; TEST VALID RANGE 






FA52I B04E 




BCS ERROR 






FA54I Bl 74 


VRFY1 


LDA (A1L),Y ; COMPARE BYTE FOR BYTE 






FA5 6I Dl 7A 




CMP (A4L),Y ; MATCH? 






FA58| F006 




BEQ VRFY2 ; YES, DO NEXT. 






FA5AI 20 66FA 




JSR MISMATCH ; PRINT BOTH BYTES 






FA5DI 20 EFFC 




JSR CROUT ; GOTO NEWLINE 






FA60I 20 8EF9 


VRFY2 


JSR NXTA4 ; BUMP BOTH Al AND A4 






FA6 3I 90EF 




BCC VRFY1 






FA65I 60 




RTS ; VERIFY DONE. 






FA6 6I 


; 








FA6 6I A5 7B 


MISMATCH 


LDA A4H ; PRINT ADDRESS OF A4 






FA6B| 20 AEF9 




JSR PRBYTE 






FA6BI A5 7A 




LDA A4L 






FA6DI 20 C4F9 




JSR PRBYCOL ; OUTPUT A COLON FOR SEPARATOR 






FA70I Bl 7A 




LDA (A4L),Y ; AND THE DATA 






FA7 2I 20 84FA 




JSR PRBYTSP ; PRINT THE BYTE AND A SPACE 






FA75I 20 87FA 


PRINTA1 


JSR PRSPC ; LEAD WITH A SPACE 






FA7 8I A5 75 




LDA A1H ; OUTPUT ADDRESS Al 






FA7AI 20 AEF9 




JSR PRBYTE 






FA7DI A5 74 




LDA AIL 






FA7FI 20 C4F9 




JSR PRBYCOL ; SEPARATE WITH A COLON 






FA82I Bl 74 


PRA1BYTE 


LDA (A1L),Y ; PRINT BYTE POINTED TO BY Al 






FA84 I 20 AEF9 


PRBYTSP 


JSR PRBYTE 






FA87I A9 A0 


PRSPC 


LDA O0A0 ; PRINT A SPACE 






FA89I 4C 39FC 




JMP COUT ; END VIA OUTPUT ROUTINE. 






FA8CI 


; 








FA8C| 4C 5803 


OSER 


JMP USERADR 






FA8FI 


; 


J 
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FA8FI 


68 


JUMP 


PLA 






FA90 


68 




PLA 


LEAVE STACK WITH NOTHIN' ON IT. 






FA91 


20 D6F9 


GO 


JSR A1PC 


STUFF PROGRAM COUNTER 






FA94 


6C 7200 




JMP @PCL 


JUMP TO USER PROG. 






FA97 




; 










FA97 


FA97 


RWERROR 


.EQU * 


PRINT ERROR NUMBER 






FA97 


20 AEF9 




JSR PRBYTE 


PRINT THE OFFENDER 






FA9A 


A9 Al 




LDA #0A1 


FOLLOWED BY A "!" 






FA9C 


20 39FC 




JSR COUT 








FA9F 


20 07FD 


ERROR2 


JSR NOSTOP 


OUTPUT A CARRIAGE RETURN (NO STOPLST) 






FAA2 


4C 04F9 


ERROR 


JMP MON 








FAA5 




; 










FAA5 


A5 76 


DEST 


LDA A2L 


COPY A2 TO A4 FOR DESTINATION OP 






FAA7 


85 7A 




S1A A4L 








FAA9 


A5 77 




LDA A2H 








FAAB 


85 7B 




STA A4H 








FAAD 


60 




RTS 








FAAE 




; 










FAAE 


20 B8FA 


SEP 


JSR SPCE 


SEPARATOR TEST STORE MODE OR DUMP. 






FAB1 


98 




TYA 


ZERO MODE. 






FAB 2 


F01D 




BEQ SETMDZ 


BRANCH ALWAYS 






FAB 4 




t 










FAB 4 


C6 7D 


BL1 


DEC YSAV 


TEST FOR NO LINE 






FAB 6 


F04 5 




BEQ DUMP 8 


IF NO LINE, GIVEM A ROW OF BYTES 






FAB 8 


CA 


SPCE 


DEX 


TEST IF AFTER ANOTHER SPACE 






FAB9 


D016 




BNE SETMDZ 








FABB 


C9 BA 




CMP #0BA 


STORE MODE? 






FABD 


D04B 




BNE TSTDUMP 








FABF 


85 7C 


STOR 


STA STATE 


KEEP IT IN STORE STATE 






FAC1 


A5 76 




LDA A2L 


GET BYTE TO BE STORED 






FAC3 


91 78 


STOR1 


STA (A3L),Y 


PUT IT IN MEMORY. 






FAC5 


E6 78 




INC A3L 


BUMP POINTER 






FAC7 


D002 




BNE DUMMY 








FAC9 


E6 79 




INC A3H 








FACB 


60 


DUMMY 


RTS 


ALSO USED FOR '/' TO CLEAR MODE 






FACC 




; 










FACC 


A4 7D 


SETMODE 


LDY YSAV 


USE INPUT CHARACTER 






FACE 


88 




DEY 








FACF 


Bl 7E 




LDA (INBUF),Y 


TO SET MODE 






FAD1 


85 7C 


SETMDZ 


STA STATE 








FAD 3 


60 




RTS 








FAD 4 




; 










FAD4 


A9 01 


READ 


LDA #01 


GET DISK COMMAND TO READ 






FAD 6 


2C 




.BYTE 2C 


DUMMY BIT TO SKIP 2 BYTES 






FAD 7 


A9 02 


WRTE 


LDA #02 


SET DISK COMMAND TO WRITE 






FAD 9 


85 87 


SAVCMD 


STA IBCMD 








FADB 


A5 74 


RWLOOP 


LDA AIL 








FADD 


85 85 




STA IBBUFP 


COMMAND FORMAT IS 






FADF 


A5 75 




LDA A1H 


BLOCKNUMBER <ADDRESS END ADDRESS 






FAE1 


85 86 




STA IBBUFP+1 








FAE3 


A6 7B 




LDX A4H 


SEND BLOCK NUMBER VIA X S A 






FAE5 


A5 7A 




LDA A4L 








FAE7 


78 




SEI 


NO INTERRUPTS WHILE IN MONITOR 






FAE8 


20 79F4 




JSR BLOCKIO 


DO DISKO FEVER 






FAEB 


B0AA 




BCS RWERROR 


GIVE UP IF ERROR ENCOUNTERED 






FAED 


E6 7A 




INC A4L 


BUMP BLOCK NUMBER 






FAEF 


D002 




BNE NOVER 








FAF1 


E6 7B 




INC A4H 








FAF3 


E6 75 


NOVER 


INC A1H 


BUMP RAM ADDRESS BY 512 BYTES 






FAF5 


E6 75 




INC A1H 








FAF7 


20 9DF9 




JSR TSTA1 


TEST FOR FINISHED 






FAFA 


90DF 




BCC RWLOOP 


NOT DONE, DO NEXT BLOCK 






FAFC 


60 




RTS 








FAFD 




; 










FAFD 


A5 75 


DUMPS 


LDA A1H 








FAFF 


85 77 




STA A2H 








FB01 


20 CBF9 




JSR TST80WID 


GET WIDTH MASK INTO ACC 






FB04 


05 74 




ORA AIL 








FB06 


85 76 




STA A2L 








FB08 


D006 




BNE DUMP0 


BRANCH ALWAYS 






FB0A 




; 










FB0A 


4A 


TSTDUMP 


LSR A 


DUMP? 






FB0B 


B095 


ERROR1 


BCS ERROR 








FB0D 


20 CBF9 


DUMP 


JSR TST80WID 


SET FOR EITHER B0 OR 40 COLUMNS 






FB10 


A5 74 


DUMP0 


LDA AIL 








FBI 2 


85 7A 




STA A4L 








FBI 4 


A5 75 




LDA A1H 








FBI 6 


85 7B 




STA A4H 








FBI 8 


20 9DF9 




JSR TSTA1 


• TEST FOR VALID RANGE 






FB1B 


B0EE 




BCS ERROR1 








FB1D 


20 75FA 


DUMP1 


JSR PRINTA1 


■ PRINT ADDRESS AND FIRST BYTE 






FB20 


20 94F9 


DUMP2 


JSR NXTA1 








FB23 


B010 




BCS DUMPASC 


• END WITH ASCII 






FB25 


A5 74 




LDA AIL 


• TEST END OF LINE 






FB27 


25 69 




AND MASK 


• FOR 40/80 COLUMN 






FB29 


D005 




BNE DUMP 3 








FB2B 


20 35FB 




JSR DUMPASC 








FB2E 


D0ED 




BNE DUMP 1 


; BRANCH ALWAYS 






FB30 


20 82FA 


DUMP 3 


JSR PRA1BYTE 


; GO PRINT NEXT BYTE AND A SPACE 






FB33 


D0EB 




BNE DUMP 2 


; ALWAYS (ACC JUST PULLED AS $A0) 
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FB35 




; 








FB35 


A5 7A 


DUMPASC 


LDA A4L 


; RESET TO BEGINNING OF LINE 






FB37 


85 74 




STA AIL 








FB39 


A5 7B 




LDA A4H 








FB3B 


85 75 




STA A1H 








FB3D 


20 87FA 




JSR PRSPC 


; PRINT AN EXTRA SPACE 






FB40 


A0 00 


ASCI 


LDY #00 


; TO INDEX MEMORY INDIRECT 






FB42 


Bl 74 




LDA (AIL) , Y 








FB44 


09 80 




ORA #80 


; SET NORMAL VIDEO 






FB4 6 


C9 A0 




CMP #0A0 


; TEST FOR CONTROL CHARACTERS 






FB4 8 


B002 




BCS ASC2 


; OK TO PRINT NON CONTROLS 






FB4A 


A9 AE 




LDA #0AE 


; OTHERWISE PRINT A SPACE 






FB4C 


20 39FC 


ASC2 


JSR COUT 


; POT IT OUT 






FB4F 


20 8EF9 




JSR NXTA4 


; BUMP BOTH Al AND A4 






FB52 


B006 




BCS ASC3 


; FINISHED 






FB54 


A5 74 




LDA AIL 


; TEST END OF LINE 






FB56 


25 69 




AND MASK 








FB58 


D0E6 




BNE ASCI 


; NOT DONE, PRINT NEXT 






FB5A 


4C EFFC 


ASC3 


JMP CROUT 








FB5D 




- 










FB5D 




• 










FB5D 


38 


COL80 


SEC 


; INDICATE 80 COLUMNS 






FB5E 


AD 53C0 




LDA 0C053 


; GOTO 80 COLUMN MODE 






FB61 


B004 




BCS SET80 


; BRANCH ALWAYS 






FB63 




; 










FB63 


18 


COL 40 


CLC 


; INDICATE 40 COLUMNS DESIRED 






FB64 


AD 52C0 




LDA 0C052 


; GOTO 40 COLUMN MODE 






FB67 


A5 68 


SET80 


LDA MODES 








FB69 


09 40 




ORA #40 


; ASSUME 80 






FB6B 


B002 




BCS SET80A 


; AND BRANCH IF IT IS 






FB6D 


2 9 BF 




AND #0BF 


; BUT FIX FOR 40 IF NOT 






FB6F 


85 68 


SET80A 


STA MODES 








FB71 


09 7F 




ORA #7F 


; ISOLATE BIT 7 






FB73 


2 9 A0 




AND #0A0 


; (BIT 7 SETS NORMAL/ INVERSE) 






FB75 


85 66 




STA FORGND 








FB77 


B002 




BCS SET80B 


; AGAIN ASSUMES 80 COLUMNS 






FB7 9 


A9 F0 




LDA #0F0 


; IF NOT, SET FOR/BACKGROUND COLOR 






FB7B 


85 67 


SET80B 


STA BKGND 








FB7D 




• 










FB7D 


A5 58 


CLSCRN 


LDA LMARGIN 


; SET CURSOR TO TOP LEFT OF WINDOW 






FB7F 


85 5C 




STA CH 








FB81 


A5 5A 




LDA WINTOP 








FB83 


85 5D 




STA CV 


; NOW DROP INTO CLEAR END OF PAGE 






FB85 




; 










FB85 


A5 5C 


CLEOP 


LDA CH 


; SAVE CURRENT CURSOR POSITION 






FB87 


48 




PHA 








FB88 


A5 5D 




LDA CV 








FB8A 


48 




PHA 








FB8B 


20 C5FB 




JSR SETCV 








FB8E 


20 A2FB 


CLEOP1 


JSR CLEOL 


; CLEAR TO END OF FIRST LINE 






FB91 


A5 58 




LDA LMARGIN 








FB93 


85 5C 




STA CH 








FB95 


20 DDFB 




JSR CURDOWN 


; GOTO NEXT LINE 






FB98 


90F4 




BCC CLEOP 1 








FB9A 


68 




PLA 








FB9B 


A8 




TAY 








FB9C 


68 




PLA 


; RESTORE CURSOR POSITION 






FB9D 


85 5C 




STA CH 








FB9F 


98 




TYA 


; GET OLD CV IN ACC AGAIN 






FBA0 


B02 3 




BCS SETCV 


; BRANCH ALWAYS 






FBA2 














FBA2 


A5 5C 


CLEOL 


LDA CH 


; CLEAR TO END OF LINE FIRST 






FBA4 


4C 89FC 




JMP CLEOL 1 








FBA7 














FBA7 


C9 80 


CONTROL 


CMP #80 








FBA9 


9065 




BCC DISPLAYX 


; IF INVERSE 






FBAB 


C9 8D 


TSTCR 


CMP #8D 


,- IF CARRIAGE RETURN THEN NEW LINE 






FBAD 


D03A 




BNE TSTBACK 








FBAF 


20 A2FB 


CARRAGE 


JSR CLEOL 


; FIRST CLEAR TO THE END OF THIS LINE 






FBB2 


20 D7FB 




JSR SETCHZ 


; RESET CURSOR AND GOTO NEXT LINE (CARRY IS SET) 






FBB5 


4C 16FC 




JMP NXTLIN 


; THEN GOTO THE NEXT LINE. 






FBB8 














FBB8 














FBB8 


A5 5D 


CURUP 


LDA CV 


; TEST FOR TOP OF SCREEN 






FBBA 


C6 5D 




DEC CV 


,- ANTICIPATE 'NOT' TOP 






FBBC 


C5 5A 




CMP WINTOP 








FBBE 


D002 




BNE CORDP1 


; IT'S NOT TOP, CONTINUE 






FBC0 


A5 5B 




LDA WINBTM 


; WRAP AROUND TO BOTTOM 






FBC2 


38 


CURUP 1 


SEC 


; DECREMENT BY ONE 






FBC3 


E9 01 




SBC #01 








FBC5 


85 5D 


SETCV 


STA CV 


; SAVE NEW VERTICAL LINE 






FBC7 


FBC7 


BASCALC 


.EQU * 








FBC7 


FBC7 


CURDN1 


.EQU * 








FBC7 


A5 5D 




LDA CV 


,- GET VALUES FOR FIRST PAGE ($400) 






FBC9 


104E 




BPL BASCALC1 


; ALWAYS 






FBCB 




• 










FBCB 


24 68 


CURIGHT 


BIT MODES 


; TEST FOR 80 OR 40 






FBCD 


7002 




BVS RIGHT1 








FBCF 


E6 5C 




INC CH 








FBD1 


E6 5C 


RIGHT1 


INC CH 


,- BUMP CURSOR HORIZONTAL j 
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FBD3 


A5 5C 




LDA CH 


; TEST FOR NEW LINE 




FBD5 


C5 59 




CMP RMARGIN 








FBD7 


A5 58 


SETCHZ 


LDA LMARGIN 


; JUST IN CASE WE HAVE. 






FBD9 


905D 




BCC CTRLRET 








FBDB 


85 5C 


SETCVH 


STA CH 


; CURSOR AT START OF NEXT LINE 






FBDD 




; DROP INTO CURDOWN FOR WRAP 


AROUND 






FBDD 














FBDD 


E6 5D 


CURDOWN 


INC CV 


; MOVE CURSOR DOWN ONE LINE 






FBDF 


A5 5D 




LDA CV 


; ANTICIPATE NOT BOTTOM 






FBE1 


C5 5B 




CMP WINBTM 


; TEST FOR BOTTOM 






FBE3 


90E2 




BCC CURDN1 








FBE5 


A5 5A 




LDA WINTOP 








FBE7 


B0DC 




BCS SETCV 


; BRANCH ALWAYS 






FBE9 














FBE9 


C9 88 


TSTBACK 


CMP #88 


; BACKSPACE? 






FBEB 


D05D 




BNE TSTBELL 








FBED 


24 68 


CURLEFT 


BIT MODES 


; TEST FOR FOURTY OR EIGHTY MODE 






FBEF 


7002 




BVS LEFT 80 








FBF1 


C6 5C 




DEC CH 








FBF3 


C6 5C 


LEFT80 


DEC CH 








FBF5 


3006 




BMI LEFTUP 








FBF7 


A5 5C 




LDA CH 


; TEST FOR WRAP AROUND 






FBF9 


C5 58 




CMP LMARGIN 








FBFB 


103B 




BPL CTRLRET 








FBFD 


20 B8FB 


LEFTUP 


JSR CURUP 








FC00 


A5 59 




LDA RMARGIN 








FC02 


85 5C 




STA CH 


; SAVE NEW CURSOR POSITION 






FC04 


D0E7 




BNE CURLEFT 


; BRANCH ALWAYS 






FC06 














FC06 


C9 A0 


COUT2 


CMP #0A0 


; IS IT CONTROL CHARACTER 






FC08 


909D 




BCC CONTROL 








FC0A 


24 68 




BIT MODES 


; TEST FOR INVERSE 






FC0C 


3002 




BMI DISPLAYX 


; NO PUT IT OUT 






FC0E 


2 9 7F 




AND #7F 


; STRIP HI BIT 






FC10 


20 9DFC 


DISPLAYX 


JSR DISPLAY 








FC13 




• 










FC13 


20 CBFB 


INCHORZ 


JSR CURIGHT 


; MOVE CURSOR RIGHT 






FC16 


B043 


NXTLIN 


BCS SCROLL 


; IT'S BOTTOM, RESET CH=0 AND SCROLL 






FC18 


60 




RTS 


; RESET CH ONLY 






FC19 














FC19 


08 


BASCALC1 


PHP 


; CALC BASE ADR IN BAS4L.H 






FC1A 


48 




PHA 








FC1B 


4A 




LSR A 


; FOR GIVEN LINE NO. 






FC1C 


2 9 03 




AND #03 


; 0<=LINE NO.<$17 






FC1E 


09 04 




ORA #04 


; ARG=000ABCDE, GENERATE 






FCZ0 


85 5F 




STA BAS4H 


; BAS4H=000001CD 






FC22 


49 0C 




EOR #0C 








FC24 


85 61 




STA BAS8H 








FC2 6 


68 




PLA 


; AND 






FC27 


29 18 




AND #18 


; BAS4L=EABAB000 






FC2 9 


9002 




BCC BSCLC2 








FC2B 


69 7F 




ADC #7F 








FC2D 


85 5E 


BSCLC2 


STA BAS4L 








FC2F 


0A 




ASL A 








FC30 


0A 




ASL A 








FC31 


05 5E 




ORA BAS4L 








FC33 


85 5E 




STA BAS4L 








FC35 


85 60 




STA BAS8L 


; SAME FOR PAGE 2 






FC37 


28 




PLP 








FC38 


60 


CTRLRET 


RTS 








FC39 














FC3 9 


48 


COUT 


PHA 


; SAVE CHARACTER 






FC3A 


84 6D 




STY TEMPY 








FC3C 


8 6 6C 




STX TEMPX 








FC3E 


20 47FC 




JSR COUT1 








FC41 


A4 6D 




LDY TEMPY 








FC43 


A6 6C 




LDX TEMPX 








FC4 5 


68 




PLA 








FC4 6 


60 




RTS 








FC4 7 


6C 6E00 


COUT1 


JMP @CSWL 


; NORMALLY COUT1 






FC4A 














FC4A 


C9 87 


TSTBELL 


CMP #87 


; BELL? 






FC4C 


D004 




BNE LNFD 


; NO TEST FOR FORM FEED 






FC4E 


AE 40C0 


BELL 


LDX 0C040 


; SOUND BELL 






FC51 


60 




RTS 








FC52 


C9 8A 


LNFD 


CMP #8A 


,- LINE FEED? 






FCS4 


D0E2 




BNE CTRLRET 








FC5 6 


20 DDFB 




JSR CURDOWN 


; MOVE CURSOR DOWN A LINE 






FC5 9 


90DD 




BCC CTRLRET 


; BRANCH IF NO SCROLL NECESSARY. 






FC5B 




' 










FC5B 


A5 5A 


SCROLL 


LDA WINTOP 


; START WITH TOP LINE 






FCSD 


48 




PHA 


; SAVE IT FOR NOW 






FCSE 


20 C5FB 




JSR SETCV 


; GET BASCALC FOR THIS LINE 






FC61 


A2 03 


SCRL1 


LDX #03 


; MOVE CURRENT BASCALC AS DESTINATION 






FC63 


B5 5E 


SCRL2 


LDA BAS4L,X 








FC65 


95 58 




STA TBAS4L,X 


; (TEMPORARY BASE ADDR. ) 






FC67 


CA 




DEX 








FC68 


10F9 




BPL SCRL2 








FC6A 


68 




PLA 


; GET DESTINATION LINE 






FC6B 


18 




CLC 


' 
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FC6CI 69 01 




ADC #01 ; CALCULATE SOURCE LINE. 




FC6EI C5 5B 




CMP WINBTM ; IS IT THE LAST LINE? 






FC70I B015 




BCS LASTLN ; YES, CLEAR IT 






FC72I 48 




PHA ; SAVE AS NEXT DESTINATION LINE 






FC73I 20 C5FB 




JSR SETCV ; GET BASE ADDR FOR SOURCE LINE 






FC76I A5 59 




LDA RMARGIN ; MOVE SOURCE TO DESTINATION 






FC78| 4A 




LSR A ; DIVIDE BY 2 






FC79I A8 




TAY 






FC7AI 88 


SCRL3 


DEY ; DONE YET 






FC7BI 30E4 




BMI SCRL1 ; YES, DO NEXT LINE 






FC7DI Bl 5E 




LDA (BAS4L),Y 






FC7FI 91 58 




STA (TBAS4L),Y 






FC81 | Bl 60 




LDA (BAS8L) , Y 






FC83| 91 64 




STA (TBAS8L) , Y 






FC85I 90F3 




BCC SCRL3 ; BRANCH ALWAYS 






FC87| A5 58 


LASTLN 


LDA LMARGIN ; BLANK FILL THE LAST LINE 






FC89| 4A 


CLEOL1 


LSR A ; DIVIDE BY 2 






FC8A| A8 




TAY 






FC8BI B004 




BCS CLEOL2 






FC8DI A5 66 




LDA FORGND ; (NORMALLY A SPACE) 






FC8FI 91 5E 




STA (BAS4L) , Y 






FC91I A5 67 


CLEOL2 


LDA BKGND ; (IF 80 COLUMNS, ALSO A SPACE) 






FC93I 91 60 




STA (BAS8L),Y 






FC95I C8 




INY 






FC96I 98 




TYA ; TEST FOR END OF LINE 






FC97 | 0A 




ASL A ; MULT BY 2 AGAIN 






FC98I C5 59 




CMP RMARGIN 






FC9AI 90ED 




BCC CLEOL1 ; CONTINUE IF MORE TO DO. 






FC9CI 60 




RTS ; ALL DONE. 






FC9DI 










FC9DI 24 68 


DISPLAY 


BIT MODES ; TEST FOR 40 OR 80 






FC9FI 700C 




BVS DSPL80 ; STORE THE SINGLE CHARACTERS AND RETURN 






FCA1 I 4 6 5C 




LSR CH ; INSURE PROPER 40 COLUMN DISPLAY 






FCA3I 06 5C 




ASL CH ; BY DROPPING BIT 






FCA5I 20 ADFC 




JSR DSPL80 ; DISPLAY IN $400 PAGE. 






FCA8I A5 67 




LDA BKGND ; ALSO SET BACKGROUND COLOR 






FCAA| 91 60 


DSPBKGND 


STA (BAS8L),Y 






FCAC I 60 




RTS 






FCAD| 


; 








FCADI 4 8 


DSPL80 


PHA ; PRESERVE CHARACTER 






FCAEI A5 5C 




LDA CH ; DETERMINE WHICH PAGE 






FCB0| 4 A 




LSR A 






FCB1| A8 




TAY 






FCB2I 68 




PLA 






FCB3I B0F5 




BCS DSPBKGND ; BRANCH IF $900 PAGE 






FCB5I 91 5E 




STA (BAS4L),Y 






FCB7I 60 




RTS 






FCB8I 


; 








FCB8I Bl 7E 


NOTCR 


LDA (INBUF),Y ; ECHO CHARACTER 






FCBAI 20 39FC 




JSR COUT 






FCBDI C9 88 




CMP #88 ; BACKSPACE 






FCBFI F01D 




BEQ BKSPCE 






FCC1I C9 98 




CMP #98 ; CANCEL? 






FCC3| F008 




BEQ CANCEL 






FCC5I E6 80 




INC TEMP 






FCC7| A5 80 




LDA TEMP 






FCC9I C9 50 




CMP #INBUFLEN 






FCCB| D017 




BNE NXTCHAR ; NO WRAP AROUND ALLOWED. 






FCCDI A9 DC 


CANCEL 


LDA #0DC ; OUTPUT BACKSLASH 






FCCFI 20 39FC 




JSR COUT 






FCD2I 20 EFFC 




JSR CROUT 






FCD5I FCD5 


GETLNZ 


.EQU * 






FCD5I A5 6B 


GETLN 


LDA PROMPT 






FCD7| 20 39FC 




JSR COUT 






FCDAI A0 01 




LDY #01 






FCDCI 84 80 




STY TEMP ; START AT BEGINNING OF INBUF 






FCDEI A4 80 


BKSPCE 


LDY TEMP 






FCE0I F0F3 




BEQ GETLN 






FCE2I C6 80 




DEC TEMP ; BACK UP INPUT BUFFER 






FCE4 I 20 60FD 


NXTCHAR 


JSR RDCHAR ; GET INPUT 






FCE7| A4 80 




LDY TEMP 






FCE9I 91 7E 




STA (INBUF), Y 






FCEBI C9 8D 




CMP #8D 






FCEDI D0C9 




BNE NOTCR 






FCEFI FCEF 


CROUT 


.EQU * 






FCEFI 2C 00C0 




BIT KBD ; TEST FOR START/STOP 






FCF2I 1013 




BPL NOSTOP 






FCF4 | 20 2EFD 




JSR KEYIN3 ; READ KBD 






FCF7 | C9 A0 




CMP #0A0 ; IS IT A SPACE? 






FCF9I F007 




BEQ STOPLST ; YES, PAUSE TIL NEXT KEYPRESS. 






FCFBI C9 89 




CMP #89 ; QUIT THIS OPERATION 






FCFDI D008 




BNE NOSTOP ,- NO, IGNORE THIS KEY. 






FCFFI 4C 9FFA 




JMP ERROR2 ; YES, RESTART 






FD02I AD 00C0 


STOPLST 


LDA KBD 






FD05| 10FB 




BPL STOPLST 






FD07 | A9 8D 


NOSTOP 


LDA #8D 






FD09| 4C 39FC 




JMP COUT 






FD0CI 


; 








FD0C| 6C 7000 


RDKEY 


JMP 9KSWL 






^FD0F I 


: 


i 
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FD0FI A9 7F 


KEYIN 


LDA #7F 


; MAKE SURE FIRST IS CURSOR 




FD11I 85 63 




ST A TBAS4H 








FD13I 20 88FD 




JSR PICK 


; GO READ SCREEN 






FD16| 4 8 


KEYIN1 


PHA 


; SAVE CHR AT CURSOR POSITION 






FD17I 20 35FD 




JSR KEYWAIT 


; TEST FOR KEYPRESS 






FD1AI B008 




BCS KEYIN2 


; GO GET IT 






FD1CI A5 69 




LDA CURSOR 


; GIVE THEM AN UNDERSCORE FOR A TIME 






FD1EI 20 9DFC 




JSR DISPLAY 








FD21I 20 35FD 




JSR KEYWAIT 


; GO SEE IF KEYPRESSED 






FD24| 68 


KEYIN2 


PLA 








FD25I 08 




PHP 


; SAVE KEYPRESS STATUS 






FD26I 48 




PHA 








FD27| 20 9DFC 




JSR DISPLAY 








FD2AI 68 




PLA 








FD2BI 28 




PLP 








FD2CI 90E8 




BCC KEYIN1 








FD2EI AD 00C0 


KEYIN3 


LDA KBD 


; READ KEYBOARD 






FD31I 2C 10C0 


KEYIN4 


BIT KBDSTRB 


; CLEAR KEYBOARD STROBE 






FD34| 60 




RTS 








FD35| E6 58 


KEYWAIT 


INC TBAS4L 


; JUST KEEP COUNTING 






FD37I D009 




BNE KWAIT2 








FD39I E6 63 




INC TBAS4H 








FD3BI A9 7F 




LDA #7F 


; TEST FOR DONE 






FD3D| 18 




CLC 








FD3EI 25 63 




AND TBAS4H 








FD40I F005 




BEQ KEYRET 


; RETURN IF TIMED OUT 






FD42I 0E 00C0 


KWAIT2 


ASL KBD 








FD45I 90EE 




BCC KEYWAIT 








FD47I 60 


KEYRET 


RTS 








FD48I 












FD4 8I 


; 










FD48I FD4 8 


ESC3 


.EQU * 








FD48I 20 77FD 




JSR GOESC 








FD4BI A5 68 


ESCAPE 


LDA MODES 


; SET TO + SIGN FOR CURSOR MOVES 






FD4DI 29 80 




AND #80 








FD4F| 4 9 AB 




EOR #0AB 








FD51| 85 69 




STA CURSOR 








FD53I 20 0CFD 


ESC1 


JSR RDKEY 


; READ NEXT CHARACTER 






FD56I A0 08 




LDY #08 


; TEST FOR ESCAPE COMMAND 






FD58I D9 F0FF 


ESC2 


CMP ESCTABL,Y 








FD5B| F0EB 




BEQ ESC3 








FD5DI 88 




DEY 








FD5EI 10F8 




BPL ESC2 


; LOOP TIL FOUND OR DONE 






FD60I 


■ 










FD60I A9 80 


RDCHAR 


LDA #80 


; GO READ A CHARACTER 






FD62I 25 68 




AND MODES 








FD64| 85 69 




STA CURSOR 


; SAVE STANDARD CURSOR 






FD66| 20 0CFD 




JSR RDKEY 








FD69| C9 9B 




CMP #9B 


; ESCAPE CHARACTER? 






FD6BI F0DE 




BEQ ESCAPE 








FD6DI C9 95 




CMP #95 


; FORWARD COPY? 






FD6FI D0D6 




BNE KEYRET 








FD71I 20 88FD 




JSR PICK 


; GET CHARACTER FROM SCREEN 






FD74| 09 80 




ORA #80 


; SET TO NORMAL ASCII 






FD7 6I 60 




RTS 








FD77I 












FD7 7| A9 FB 


GOESC 


LDA #0FB 








FD79I 48 




PHA 








FD7AI B9 7FFD 




LDA ESCVECT, Y 








FD7DI 48 




PHA 








FD7EI 60 




RTS 








FD7FI Al 


ESCVECT 


.BYTE 0A1 


; CLEOL-1 






FD80I 84 




.BYTE 84 


; CLEOP-1 






FD81] 7C 




.BYTE 7C 


; CLSCRN-1 






FD82I 62 




.BYTE 62 


; COL 4 0-1 






FD83I 5C 




.BYTE 5C 


; COL80-1 






FD84I EC 




.BYTE 0EC 


; CURLEFT-1 






FD85I CA 




.BYTE 0CA 


,- CURIGHT-1 






FD8 6| DC 




.BYTE 0DC 


; CURDOWN-1 






FD87| B7 




.BYTE 0B7 


; CURUP-1 






FD88I 












FD88I A5 5C 


PICK 


LDA CH 


,- GET A CHARACTER AT CURRENT CURSOR POSITION 






FD8A| 4 A 




LSR A 


; DETERMINE WHICH PAGE. 






FD8B| A8 




TAY 








FD8C| 24 68 




BIT MODES 


; AND IF 80 COLUMN MODE 






FD8EI 5005 




BVC PICK40 


; FORGET CARRY IF 40 COLUMNS 






FD90I 9003 




BCC PICK40 


; GET CHARACTER FROM $400 






FD92I Bl 60 




LDA (BAS8L),Y 








FD94| 60 




RTS 








FD95| Bl 5E 


PICK40 


LDA (BAS4L),Y 








FD97I 60 




RTS 








FD98I 


' 










FD98I FD98 


CLDSTRT 


.EQU * 








FD98| A9 03 




LDA #03 








FD9AI 8D D0FF 




STA 0FFD0 


; ZERO PAGE IS ON 3! 






FD9DI FD9D 


SETUP 


.EQU * 








FD9DI D8 




CLD 


; OF COURSE! 






FD9EI A2 03 




LDX #03 








FDA0| 86 7F 




STX INBUF+1 








FDA2 | BD BCFF 


SETUP 1 


LDA NMIRQ, X 


J 
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FDA5 


9D CAFF 




STA 0FFCA, X 




FDA8 


BD B4FF 




LDA HOOKS, X 






FDAB 


95 6E 




S1A CSWL.X 






FDAD 


BD B8FF 




LDA VBOUNDS,X 






FDB0 


95 58 




STA LMARGIN,X 






FDB2 


CA 




DEX 






FDB3 


10ED 




BPL SETUP 1 






FDB5 


85 82 




STA IBDRVN 






FDB7 


A9 A0 




LDA #0A0 ; INPUT BUFFER AT $3A0 






FDB9 


85 7E 




STA INBUF 






FDBB 


A9 60 




LDA #60 






FDBD 


85 81 




STA IB SLOT 






FDBF 


A9 FF 




LDA #0FF 






FDC1 


85 68 




STA MODES 






FDC3 


20 63FB 




JSR COL40 ; SET 40 COLUMNS, CLEAR SCREEN 






FDC6 




; 








FDC6 


00A0 


ADR 


-EQU 0A0 






FDC6 


00A0 


CPORTL 


.EQU ADR 






FDC6 


00A1 


CPORTH 


.EQU ADR+1 






FDC6 


00A2 


CTEMP 


.EQU ADR+2 






FDC6 


00A3 


CTEMP1 


.EQU ADR+3 






FDC6 


00A4 


YTEMP 


.EQU ADR+4 






FDC6 


00C0 


ROWTEKP 


.EQU ADR+20 






FDC6 


C0DB 


CWRTON 


.EQU 0C0DB 






FDC6 


C0DA 


CWRTOFF 


.EQU 0C0DA 






FDC6 


FFEC 


CB2CTRL 


.EQU 0FFEC 






FDC6 


FFED 


CB2INT 


.EQU 0FFED 






FDC6 












FDC6 












FDC6 


A9 78 


GENENTR 


LDA #78 ; INIT SCREEN INDX LOCATIONS 






FDC8 


85 A0 




STA CPORTL 






FDCA 


A9 08 




LDA #08 






FDCC 


85 Al 




STA CPORTH 






FDCE 


A9 F0 




LDA #0F0 ; SET UP INDEX TO CHRSET 






FDD0 


85 A4 




STA YTEMP 






FDD2 


A9 00 




LDA #00 






FDD4 


AA 




TAX 






FDD5 


95 C0 


ZIPTEMPS 


STA ROWTEMP,X 






FDD7 


E8 




INX 






FDD8 


E0 20 




CPX #20 






FDDA 


D0F9 




BNE ZIPTEMPS 






FDDC 


A9 05 




LDA #05 ; FAKE THE FIRST BIT PATTERN 






FDDE 


18 




CLC ; (PHANTOM 9TH BIT SHIFTED AS BIT 0) 






FDDF 


08 




PHP 






FDE0 


48 




PHA 






FDE1 


86 A2 


GENASC 


SIX CTEMP ; GENERATE THE ASCII 






FDE3 


A0 07 


GASCI1 


LDY #07 ; CODES FOR THE FIRST PASS 






FDE5 


A6 A2 


GASCI2 


LDX CTEMP 






FDE7 


8A 


GASCI3 


TXA 






FDE8 


91 A0 




STA (CPORTL), Y ; SXXF=CHR 0/4 






FDEA 


E8 




INX ; $XXE=CHR 1/5 






FDEB 


88 




DEY ; $XXD=CHR 2/6 






FDEC 


3006 




BMI GASCI4 ; $XXC=CHR 3/7 






FDEE 


C0 03 




CPY #03 ; SXXB=CHR 0/4 






FDF0 


D0F5 




BNE GASCI3 ; $XXA=CHR 1/5 






FDF2 


F0F1 




BEQ GASCI2 ; $XX9=CHR 2/6 






FDF4 


20 99FE 


GASCI4 


JSR NXTPORT ; $XX8=CHR 3/7 






FDF7 


B008 




BCS CBYTES ; GO DECODE CHARACTER TABLE 






FDF9 


C9 0A 




CMP #0A ; SECOND SET OF 4 ? 






FDFB 


D0E6 




BNE GASCI1 






FDFD 


A2 24 




LDX #24 






FDFF 


D0E0 




BNE GENASC ; BRANCH ALWAYS 






FE01 


68 


CBYTES 


PLA ; RESTORE BIT PATTERN 






FE02 


28 




PLP 






FE03 


A2 17 




LDX #17 ; (4 CHARACTERS OF 6 ROWS) 






FE05 


A0 05 


CCOLMS 


LDY #05 ; (FIVE COLUMNS) 






FE07 


36 C4 


CSHFT 


ROL ROWTEMP+4,X ; BREAK BYTE INTO 






FE09 


0A 




ASL A ; 5 BIT GROUPS 






FE0A 


D00E 




BNE SHFTCNT ; BRANCH IF MORE BITS IN THIS BYTE 






FE0C 


84 A2 




STY CTEMP 






FE0E 


C6 A4 




DEC YTEMP ,- (NOTE. CARRY IS SET) 






FE10 


F016 




BEQ DONE ; BRANCH IF ALL DONE 






FE12 


A4 A4 




LDY YTEMP ; GET CHARACTER TABLE INDEX 






FE14 


B9 C4FE 




LDA CHRSET-1 , Y 






FE17 


2A 




ROL A ; (CARRY KEEPS BYTE NON-ZERO UNTIL ALL 8 ARE 






FE18 






; ARE SHIFTED) 






FE18 


A4 A2 




LDY CTEMP ; RESTORE COLUMN COUNT 






FE1A 


88 


SHFTCNT 


DEY ; GOT ALL FIVE BITS? 






FE1B 


D0EA 




BNE CSHFT ; NO, DO NEXT 






FE1D 


CA 




DEX ; ALL ROWS DONE 






FE1E 


10E5 




BPL CCOLMS ; NO, DO NEXT 






FE20 


08 




PHP ; SAVE REMAINING BIT PATTERN AND CARRY 






FE21 


48 




PHA 






FE22 


20 28FE 




JSR STORCHRS ; MOVE EM TO NON DISPLAYED VIDEO AREA 






FE25 


4C 01FE 




JMP CBYTES 






FE2 8 




; 








FE2 8 


FE28 


DONE 


.EQU * 






FE28 




- 








FE2 8 


A2 IF 


STORCHRS 


LDX #1F ; MOVE CHARACTER PATTERNS TO VIDEO AREA 






FE2A 

^ 


A0 00 


STORSET 


LDY #00 
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FE2C 


B5 C0 


STOROW 


LDA 


ROWTEMP.X 




FE2E 


0A 




ASL 


A ; SHIFT TO CENTER 






FE2F 


29 3E 




AND 


♦3E ; STRIP EXTRA GARBAGE 






FE31 


91 A0 




STA 


(CPORTL) ,Y 






FE33 


CA 




DEX 








FE34 


C8 




INY 








FE35 


C0 08 




CPY 


#08 ; THIS GROUP DONE 






FE37 


D0F3 




BNE 


STOROW ; NO, NEXT ROW 






FE39 


20 99FE 




JSR 


NXTPORT 






FE3C 


C9 08 




CMP 


#08 






FE3E 


F004 




BEQ 


GENDONE ; ALL ROWS STORED? 






FE40 


8A 




TXA 








FE41 


10E7 




BPL 


STORSET 






FE4 3 


60 




RTS 


; PARTIAL SET ($478-$5FF) 






FE4 4 














FE4 4 


A9 01 


GENDONE 


LDA 


#01 ; SET NORMAL MODE 






FE4 6 


85 A2 




STA 


CTEMP 






FE4 8 


A9 60 


GEN1 


LDA 


#60 ; PREPARE TO SEND BYTES TO CHARACTER 






FE4A 


2C DBC0 




BIT 


CWRTON ; GENERATOR RAM 






FE4D 


20 AEFE 




JSR 


VRETRCE ; WAIT FOR NEXT VERTICAL RETRACE 






FE50 


A9 20 




LDA 


#20 ; WAIT AGAIN 






FE52 


20 AEFE 




JSR 


VRETRCE 






FE55 


2C DAC0 




BIT 


CWRTOFF ; CHARACTERS ARE NOW LOADED 






FE58 


20 88FE 




JSR 


ALTCHR ; REPEAT THIS SET FOR OTHER 64 CHARACTERS 






FE5B 


C6 A2 




DEC 


CTEMP ; HAVE WE DONE ALTERNATES YET? 






FE5D 


1016 




BPL 


GEN2 ; NO, DO IT! 






FE5F 


A9 08 




LDA 


#08 ; BUMP ASCII VALUES FOR NEXT SET 






FE61 


85 Al 




STA 


CPORTH 






FE63 


A0 07 


NXTASCI 


LDY 


#07 ; THE USUAL COUNTDOWN 






FE65 


Bl A0 


NXTASC2 


LDA 


(CPORTL) ,Y 






FE67 


18 




CLC 








FE68 


69 08 




ADC 


#08 






FE6A 


91 A0 




STA 


(CPORTL) , Y 






FE6C 


88 




DEY 








FE6D 


10F6 




BPL 


NXTASC2 






FE6F 


20 99FE 




JSR 


NXTPORT 






FE72 


90EF 




BCC 


NXTASCI 






FE74 


60 




RTS 








FE75 


A0 03 


GEN2 


LDY 


#03 ; SETUP ALTERNATE WITH UNDERLINES 






FE7 7 


A9 7F 




LDA 


#7F 






FE7 9 


9 9 FC05 


UNDER 


STA 


05FC.Y 






FE7C 


99 FC07 




STA 


07FC.Y 






FE7F 


88 




DEY 








FE80 


10F7 




BPL 


UNDER 






FE82 


A9 08 




LDA 


#08 






FE84 


85 Al 




STA 


CPORTH 






FE86 


D0C0 




BNE 


GEN1 






FE8 8 














FE88 


A0 07 


ALTCHR 


LDY 


#07 ; ADJUST ASCII FOR ALTERNATE SET 






FE8A 


Bl A0 


ALTC1 


LDA 


(CPORTL) , Y 






FE8C 


4 9 20 




EOR 


#20 ; $20— > $40— >S60 






FE8E 


91 A0 




STA 


(CPORTL) ,Y 






FE90 


88 




DEY 








FE91 


10F7 




BPL 


ALTC1 ,- ADJUST THEM ALL 






FE93 


20 99FE 




JSR 


NXTPORT 






FE96 


90F0 




BCC 


ALTCHR 






FE98 


60 




RTS 








FE99 














FE99 


A5 A0 


NXTPORT 


LDA 


CPORTL ; CONVERT $78->$F8 OR $F8-$78 






FE9B 


4 9 80 




EOR 


#80 






FE9D 


85 A0 




STA 


CPORTL 






FE9F 


3002 




BMI 


NOHIGH 






FEA1 


E6 Al 




INC 


CPORTH 






FEA3 


A5 Al 


NOHIGH 


LDA 


CPORTH 






FEA5 


C9 0C 




CMP 


#0C 






FEA7 


D004 




BNE 


PORTDN 






FEA9 


A9 04 




LDA 


#04 






FEAB 


85 Al 




STA 


CPORTH 






FEAD 


60 


PORTDN 


RTS 








FEAE 




; 










FEAE 


85 A3 


VRETRCE 


STA 


CTEMP1 ; SAVE BITS TO BE STORED 






FEB0 


AD ECFF 




LDA 


CB2CTRL ; CONTROL PORT FOR 'CB2 1 






FEB 3 


2 9 3F 




AND 


#3F ; RESET HI BITS TO 






FEB5 


05 A3 




ORA 


CTEMP 1 






FEB7 


8D ECFF 




STA 


CB2CTRL 






FEBA 


A9 08 




LDA 


#08 ; TEST VERTICAL RETRACE 






FEBC 


8D EDFF 




STA 


CB2INT 






FEBF 


2C EDFF 


VWAIT 


BIT 


CB2INT ; WAIT FOR RETRACE 






FEC2 


F0FB 




BEQ 


VWAIT 






FEC4 


60 




RTS 








FEC5 














FEC5 


FEC5 


CHREET 


.EQU 


* 






FEC5 




• 










FEC5 


F0 01 82 18 40 84 81 




.BYTE 


0F0,01,82,18,40, 84, 81, 2F, 58, 44, 81, 2 9, 02, IE, 01, 91, 7C, IF, 4 9, 30 






FECC 


2F 58 44 81 29 02 IE 












FED3 


01 91 7C IF 4 9 30 












FED 9 


8A 08 43 14 31 2A 22 




.BYTE 


8A,08,43,14,31,2A, 22, 13, 0E3, 0F7, 0C4, 91,4 8,0A2, 0DA, 24,0C6,4A 






FEE0 


13 E3 F7 C4 91 48 A2 












FEE7 


DA 24 C6 4A 












FEEB 


62 8C 24 C6 F8 63 8C 




.BYTE 


62,8C,24,0C6,0F8,63,8C,0C1,4 6,17,52,8A,0AF,16,14,0E3,33,31 j 
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FEF2I CI 4 6 17 52 8A AF 16 










FEF9I 14 E3 33 31 












FEFDI C6 F8 DC 73 3F 4 6 17 




-BYTE 0C6,0F8,0DC,73,3F,46,17, 62, 8C, 21,0E6, 18, 


6A,8D,61,0CF,18,62 






FF04I 62 8C 21 E6 18 6A 8D 












FF0BI 61 CF 18 62 












FF0FI 74 Dl B9 18 49 4C 91 




.BYTE 74,0D1,0B9,18,49,4C, 91 , 0C0, 0F3, 09, 2C, 91, 


0C0,14,1D,8C,0EF,07 






FF16I C0 F3 09 2C 91 C0 14 












FF1DI ID 8C EF 07 












FF21| 17 43 88 31 84 IE DF 




-BYTE 17,43,88,31,84,1E,0DF,0B,31,84,0F8,0FE,7 7,3E,3E, 17,62,8C,0FD 






FF28| 0B 31 84 F8 FE 77 3E 












FF2FI 3E 17 62 8C FD 












FF34I C7 50 E3 0B 51 C5 E8 




.BYTE 0C7,50,0E3,0B,51,0C5,0E8,0C8,73,18,0C,42 


,3E,01,02,20,42,3E 






FF3B| C8 73 18 0C 42 3E 01 












FF42| 02 20 42 3E 












FF4 6I 41 IB 8C 08 00 70 EE 




-BYTE 41, 1 8, 8C, 08, 00, 70, 0EE, 00, 11,11,21,11,02, 


0E0,3C,21,31,02,0E0 






FF4DI 00 11 11 21 11 02 E0 












FF54I 3C 21 31 02 E0 












FF59I 1C 00 C8 B9 80 62 14 




.BYTE 1C,00,0C8,0B9,80,62,14,1F,4 6,0A2,0DE,4 3, 


2C,04,88,0BE,0FF,0CE 






FF60I IF 46 A2 DE 43 2C 04 












FF67I 68 BE FF CE 












FF6BI 7D 37 49 88 95 18 98 




.BYTE 7D, 37, 49, 88, 95, 18, 98, 09, 62,0D1, 44,0E8, 88 


,0FB, 02, 90,40,00,10 






FF72I 09 62 Dl 44 E8 88 FB 












FF79| 02 90 40 00 10 












FF7EI E0 03 02 00 40 00 00 




.BYTE 0E0, 03,02,00,40, 00,00, 08,00,00,28, 10,42, 


44,25,82,0B8,2F,48 






FF85I 08 00 00 28 10 42 44 












FF8C| 25 82 B8 2F 48 












FF91| 25 44 10 82 02 00 2F 




.BYTE 25,4 4,10,82,02,00, 2F,5A, 40, 4 5,02, 8E, 64 , 50, 90, 01, 3E, 2 6, 42 , 80 






FF98I 5A 40 45 02 8E 64 50 












FF9FI 90 01 3E 26 42 80 












FFA5I 21 80 00 05 00 F8 80 




.BYTE 21 , 80, 00, 05, 00,0F8, 80, 00, 05, 08, 0F8, 80, 28 


,05,88 






FFACI 00 05 08 F8 80 28 05 












FFB3I 8 8 












FFB4I 












FFB4I FFB4 


HOOKS 


.EQU * 








FFB4I 06FC 




.WORD COUT2 








FFB6| 0FFD 




.WORD KEYIN 








FFB8I FFB8 


VBOUNDS 


-EQU * 








FFB8I 00 50 00 18 




.BYTE 00,50,00,18 








FFBCI 


■ 










FFBCI 4C B6F6 


NMIRQ 


JMP RECON ; IN DIAGNOSTICS 








FFBFI 40 




RTI 








FFC0I 


; 










FFC0I 43 4F 50 59 52 49 47 




.ASCII "COPYRIGHT JANUARY, 1980 APPLE COMPUTER 


INC. . JRH" 






FFC7| 48 54 20 4A 41 4E 55 
FFCEI 41 52 59 2C 20 31 39 






4 




■— ' 




FFD5I 38 30 20 20 41 50 50 












FFDC| 4C 45 20 43 4F 4D 50 












FFE3| 55 54 45 52 20 49 4E 






.1 / 






FFEAI 43 2E 2E 4A 52 48 






-«" ft 1 1 -J'-. 






FFF0I 


; 




T v itasf /* 






FFF0I CC D0 D3 B4 B8 88 95 


ESCTABL 


.BYTE 0CC, 0D0, 0D3, 0B4, 0B8, 88, 95, 8A, 8B, 00 


v)' V s * i) l 






FFF7| 8A 8B 00 






/"I l/« rl 






FFFA| 
FFFAI CAFF 


NMI 


.WORD 0FFCA 








FFFC| EEF4 


RESET 


.WORD DIAGN ; NOTHING 






FFFEI CDFF 


IRQ 


.WORD 0FFCD 


(A^J 






00001 










00001 




.END 






SYMBOL TABLE DUMP /C ,jfl^ i\ 


AB - Absolute LB - Label UD - 


Undefined MC - Macro 


6* ihr 




RF - Ref DF - Def 


PR - 


Proc FC - Func 


*7~iJsr 






PB - Public PV - Private CS - 


Consts 


Of 






A1H AB 0075 I AIL 


AB 0074 


A1PC LB F9D6 | A1PC1 LB F9D9 | A2H 


AB 007 7 | \* 






A2L AB 007 6 | A3H 


AB 007 9 


A3L AB 0078 1 A4H AB 007B I A4L 


AB 007A 1 






ADR AB 00A0 | ALTC1 


LB FE8A 


ALTCHR LB FE88 I ASCI LB FB40 I ASC2 


LB FB4C | . n 
LB F9E1 | WlN' 






ASC3 LB FB5A | ASCDONE 


LB FA08 


ASCII LB FA1B I ASCII0 LB FA1D I ASCII1 






ASCII2 LB F9E3 | ASCII3 


LB F9F4 


BAS4H AB 005F I BAS4L AB 005E I BAS8H 


AB 0061 I ft V 
LB FA2 9 I **• I 






BAS8L AB 0060 | BASCALC 


LB FBC7 


BASCALC1 LB FC19 I BELL LB FC4E 1 BITOFF 






BITON LB FA25 1 BKGND 


AB 0067 


BKSPCE LB FCDE | BL1 LB FAB4 | BLOCKIO 


AB F479 I Uy 






BSCLC2 LB FC2D | CANCEL 


LB FCCD 


CARRAGE LB FBAF | CB2CTRL AB FFEC | CB2INT 


AB FFED | /~\(fT . 






CBYTES LB FE01 | CCOLMS 


LB FE05 


CH AB 005C | CHRSET LB FEC5 | CKMDE 


LB FA1E 1 ' \Kr J/ryfJ 






CLDSTRT LB FD98 I CLEOL 


LB FBA2 


CLEOL1 LB FC89 I CLEOL2 LB FC91 I CLEOP 


LB FB85 1 J l -"IM 






CLEOP1 LB FB8E 1 CLSCRN 


LB FB7D 


CMDSRCH LB F91C | CMDTAB LB F96C | CMDVEC 


LB F97D I r\ i ^ 






COL40 LB FB63 | COL80 


LB FB5D 


CONTROL LB FBA7 | COUT LB FC39 | COUT1 


LB FC4 7 | \VV- 






COUT2 LB FC06 I CPORTH 


AB 00A1 


CPORTL AB 00A0 | CRCHK LB F9FD I CRMON 


LB FA3A I \f* 






CROUT LB FCEF 1 CSHFT 


LB FE07 


CSWH AB 006F I CSWL AB 006E I CTEMP 


AB 00A2 I 






CTEMP1 AB 00A3 I CTRLRET 


LB FC38 


CURDN1 LB FBC7 | CURDOWN LB FBDD | CURIGHT 


LB FBCB I 






CURLEFT LB FBED I CURSOR 


AB 006 9 


CURUP LB FBB8 | CURUP1 LB FBC2 | CV 


AB 005D | 






CWRTOFF AB C0DA I CWRTON 


AB C0DB 


DEST LB FAA5 I DIAGN AB F4EE I DIGIT 


LB F941 | 






DIGRET LB F96B 1 DISPLAY 


LB FC9D 


DISPLAYX LB FC10 I DONE LB FE28 I DSPBKGND LB FCAA 1 






DSPL80 LB FCAD I DOMMY 


LB FACB 


DUMP LB FB0D | DUMP0 LB FB10 | DUMP1 


LB FB1D | 






DUMP2 LB FB20 I DDMP3 


LB FB30 


DUMP 8 LB FAFD | DUMPASC LB FB35 I ENTRY 


LB F901 | 






ERROR LB FAA2 I ERROR1 


LB FB0B 


ERROR2 LB FA9F I ESC1 LB FD53 I ESC2 


LB FD58 1 






ESC3 LB FD4 8 I ESCAPE 


LB FD4B 


ESCTABL LB FFF0 I ESCVECT LB FD7F I FORGND 


AB 0066 I 






GASCI1 LB FDE3 I GASCI2 


LB FDE5 


GASCI3 LB FDE7 | GASCI4 LB FDF4 I GEN1 


LB FE4 8 I 




k 


Page 01 15 of 


170 



Apple Computer Inc. Patent : 4_383_296 



10/31/89 10:04 



HD:Apple ///:ROM - Monitor 



Page 14 



GEN2 


LB 


FE7 5 


GENASC 


LB 


FDE1 


GENDONE 


LB 


FE44 


GENENTR 


LB 


FDC6 


GETLN 


LB 


FCD5 | 


GETLNZ 


LB 


FCD5 


GETNUM 


LB 


F92C 


GO 


LB 


FA91 


GOESC 


LB 


FD7 7 


HOOKS 


LB 


FFB4 | 


IBBUFP 


AB 


0085 


IBCMD 


AB 


0087 


IBDRVN 


AB 


0082 


IBSLOT 


AB 


0081 


INBUF 


AB 


007 E I 


INBUFLEN 


AB 


0050 


INCHORZ 


LB 


FC13 


IRQ 


LB 


FFFE 


JUMP 


LB 


FA8F 


KBD 


AB 


C000 I 


KBDSTRB 


AB 


C010 


KEVIN 


LB 


FD0F 


KEY INI 


LB 


FD16 


KEYIN2 


LB 


FD24 


KEYIN3 


LB 


FD2E 1 


KEYIN4 


LB 


FD31 


KEYRET 


LB 


FD4 7 


KEYWAIT 


LB 


FD35 


KSWH 


AB 


0071 


KSWL 


AB 


0070 I 


KWAIT2 


LB 


FD42 


LASTLN 


LB 


FC87 


LEFT80 


LB 


FBF3 


LEFTUP 


LB 


FBFD 


LFA36 


LB 


FA36 I 


LMARGIN 


AB 


005 8 


LNFD 


LB 


FC52 


MASK 


AB 


006 9 


MISMATCH 


LB 


FA66 


MODES 


AB 


0068 | 


MON 


LB 


F904 


MONITOR 


PR 





MONZ 


LB 


F908 


MOVE 


LB 


FA40 


MOVNXT 


LB 


FA45 | 


NMI 


LB 


FFFA 


NMIRQ 


LB 


FFBC 


NOHIGH 


LB 


FEA3 


NOSTOP 


LB 


FD07 


NOTCR 


LB 


FCB8 | 


NOVER 


LB 


FAF3 


NXTA1 


LB 


F994 


NXTA4 


LB 


F98E 


NXTASC2 


LB 


FE65 


NXTASCI 


LB 


FE63 I 


NXTBAS 


LB 


F94F 


NXTBIT 


LB 


F947 


NXTBS2 


LB 


F959 


NXTCHAR 


LB 


FCE4 


NXTCHR 


LB 


F932 I 


NXTINP 


LB 


F915 


NXTLIN 


LB 


FC16 


NXTPORT 


LB 


FE99 


OLDPC 


LB 


F9E0 


PCH 


AB 


0073 I 


PCL 


AB 


007 2 


PICK 


LB 


FD88 


PICK40 


LB 


FD95 


PORTDN 


LB 


FEAD 


PRA1BYTE 


LB 


FA82 I 


PRBYCOL 


LB 


F9C4 


PRBYTE 


LB 


F9AE 


PRBYTSP 


LB 


FA84 


PRCOLON 


LB 


F9C7 


PRHEX 


LB 


F9B7 | 


PRHEX2 


LB 


F9C1 


PRHEXZ 


LB 


F9B9 


PRINTA1 


LB 


FA75 


PROMPT 


AB 


006B 


PRSPC 


LB 


FA87 I 


RDCHAR 


LB 


FD60 


RDKEY 


LB 


FD0C 


READ 


LB 


FAD 4 


RECON 


AB 


F686 


REPEAT 


LB 


FA2D 1 


REPEAT1 


LB 


FA35 


RESET 


LB 


FFFC 


RET1 


LB 


F7FE 


RET 2 


LB 


F900 


RET3 


LB 


F882 I 


RETA1 


LB 


F9AD 


RIGHT1 


LB 


FBD1 


RMARGIN 


AB 


0059 


ROWTEMP 


AB 


00C0 


RWERROR 


LB 


FA97 | 


RWLOOP 


LB 


FADB 


SAVCMD 


LB 


FAD 9 


SCAN 


LB 


F912 


SCRL1 


LB 


FC61 


SCRL2 


LB 


FC63 | 


SCRL3 


LB 


FC7A 


SCRNLOC 


AB 


0058 


SCROLL 


LB 


FC5B 


SEARCH 


LB 


FA09 


SEP 


LB 


FAAE I 


SET80 


LB 


FB67 


SET80A 


LB 


FB6F 


SET80B 


LB 


FB7B 


SETCHZ 


LB 


FBD7 


SETCV 


LB 


FBC5 1 


SETCVH 


LB 


FBDB 


SETMDZ 


LB 


FAD1 


SETMODE 


LB 


FACC 


SETUP 


LB 


FD9D 


SETUP 1 


LB 


FDA2 1 


SHFTCNT 


LB 


FE1A 


SPCE 


LB 


FAB 8 


SRC HI 


LB 


FA15 


STACK 


AB 


006A 


STATE 


AB 


007C I 


STOPLST 


LB 


FD02 


STOR 


LB 


FABF 


STORI 


T,B 


FAC3 


STORCHRS 


LB 


FE2 8 


STOROW 


LB 


FE2C I 


STORSET 


LB 


FE2A 


SVMASK 


LB 


F9D3 


TBAS4H 


AB 


0063 


TBAS4L 


AB 


0058 


TBAS8H 


AB 


0065 I 


TBAS8L 


AB 


0064 


TEMP 


AB 


0080 


TEMPX 


AB 


006C 


TEMPY 


AB 


006D 


TOSUB 


LB 


F95E | 


TST80WID 


LB 


F9CB 


TSTA1 


LB 


F99D 


TSTBACK 


LB 


FBE9 


TSTBELL 


LB 


FC4A 


TSTCR 


LB 


FBAB I 


T ST DUMP 


LB 


FB0A 


UNDER 


LB 


FE7 9 


USER 


LB 


FA8C 


USERADR 


AB 


0358 


VBOUNDS 


LB 


FFB8 I 


VRETRCE 


LB 


FEAE 


VRFY 


LB 


FA4F 


VRFY1 


LB 


FA54 


VRFY2 


LB 


FA60 


VWAIT 


LB 


FEBF | 


WINBTM 


AB 


005B 


WINTOP 


AB 


005A 


WRTE 


LB 


FAD 7 


YSAV 


AB 


007 D 


YTEMP 


AB 


00A4 | 


ZIPTEMPS 


LB 


FDD5 


Z STATE 


LB 


F967 





















Assembly complete: 1129 lines 
Errors flagged on this Assembly 



6502 OPCODE STATIC FREQUENCIES 



ADC 
AND 

ASL 
BCC 
BCS 
BEQ 
BIT 
BMI 
BNE 
BPL 
BVC 
BVS 
CLC 
CLD 
CMP 
CPX 
CPY 
DEC 
DEX 
DEY 
EOR 
INC 
I NX 
INY 
JMP 
JSR 
LDA 
LDX 
LDY 
LSR 
ORA 
PHA 
PHP 
PLA 
PLP 
ROL 
RTI 
RTS 
SBC 
SEC 
SEI 
STA 
STX 
STY 
TAX 
TAY 
TSX 
TXA 
TXS 
TYA 



5 

14 

12 

21 

20 

82 

12 

7 

41 

18 

2 

3 

7 

2 

35 

1 

2 

7 

7 

9 

6 

18 

3 

3 

18 

79 

117 

12 

20 

11 

10 

16 

4 

14 

3 

4 

1 

34 

67 

5 

1 

72 

7 

5 

2 

5 

1 

2 

1 

3 



K ******* * 



******** 
******* 
************* 
************ 

****************** 

******* 

* * ** 

************************** 

*********** 



********************* 



k ***** * 



** ** 
** * * 
***** 

** * 
********* 



*********** 

************************************************** 

************************************************************ 

******* 

************ 

******* 

****** 

********** 



********** 
V****************************** 



********************************************** 

** ** 



*************** 
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'l 0/3 1/89 10:04 "~ HD:Apple ///:ROM - Monitor Page 15 A 



Minimum frequency = 1 
Maximum frequency = 117 

Average frequency = 17 

Unused opcodes: 

BRK CLI CLV NOP ROR SED 

Program opcode usage: 89 % 



(1.00) That's all. Folks ... 



*M= 
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1 INTRODUCTION 

This document provides a general overview of the contents of the Apple /// 
computer ROM revision 1. This information should be used in conjunction with a 
copy of the ROM source code listing. The audience of this document is anyone 
with an interest in the technology of the Apple /// computer's hardware and 
software. 

NOTE 

There were two revisions of the Apple /// ROM, revision and revision 1. 
Revision ROMs had at address F1B9 the value 60. Revision 1 ROMs had at 
address F1B9 the value AO. 

This ROM contains 4 KB of 6502 programming and several data tables. The ROM 
occupies memory addresses F000-FFFF. The basic purpose of the ROM is to test 
the Apple /// computer hardware and boot an operating system from the ///'s 
built-in floppy disK drive. The ROM also contains a simple Monitor program whose 
purpose is to allow the user to interact with the /// at the hexadecimal level. 

Apple planned from an architectural perspective to support two 4K ROMs. But 
only one ROM was ever created. The Environment Register let you control which 
ROM was active. Both ROMs shared the same address space so you could only 
have one ROM active at a time. This feature would have doubled the ROM's 
effective size providing Apple with more room for ROM-based features that higher- 
level /// software (e.g. SOS) could have used. 

When the Apple /// computer is turned on the ROM's flow of execution is as 
follows: 
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1) The ROM starts execution at the address contained in FFFC-FFFD (RESET) which is 
address F4EE (DIAGN). 

2) Diagnostics (DIAGN/F4EE) starts. The diagnostic first initializes some memory for the 
ROM's use. If the Open Apple and the Control keys are held down then enter the ROM 
Monitor. Otherwise run several diagnostic checks of the /// hardware (tests zero 
page, sizes memory, initializes screen text buffer, tests stack memory, tests ROM 
checksum, tests VIA chip, tests AC I A chip, tests A/D circuitry, tests keyboard 
connection). Any diagnostic failures display an error message and the user has to 
reset the computer. 

3) Read block (512 bytes) to address A000 from the floppy disk in the built-in disk drive 
(BOOT/F6A1). If no disk is found or block cannot be read then display "RETRY" and 
wait for the user to reset the computer. If the block is successfully read then execute 
the block contents (this is called the SOS Bootstrap Loader: see section ROM USAGE BY 
SOS). 



2 



ROM SECTIONS 



Section 



Address Purpose 



Disk I/O F000-F4C4 Read and write floppy disk blocks (512 bytes each) 

Diagnostics F4C5-F7FE Diagnose the /// hardware 

Monitor F7FF-FFFF interacts with user so user can do simple things 



IMPORTANT ROM ROUTINES 



BLOCKIO / F479 

BOOT / F6A1 
ENTRY / F901 
DIAGN / F4EE 
USRENTRY/F6E6 



Reads or write a disk block (512 bytes), calls routine REGRWTS (FOOO) 
which reads a sector (256 bytes) from the disk. 

Read floppy disk block *0 into address A000, execute the block. 

Monitor entry point. 

Diagnostic entry point. 

Tests RAM and displays a table showing chip failures (users may execute 
this routine from the Monitor). This test is aimed at Apple ///s with 
12BK of RAM that exists on the older 12-Volt RAM boards. Though this 
routine will work with the newer 5- Volt RAM boards (256K) this test 
shows wrong information when RAM errors occur since the two RAM 
boards contain a different number of RAM chips. You can identify the 
different RAM boards as follows: The 5V boards have a large gray 
ceramic resistor near the edge and the 12V boards have a small blue 
tubular capacitor. To test the ///'s RAM you really should use Apple's /// 
Diagnostics Disk which lets you specify which RAM board you have. 



ROM TABLES 



Here's a list of the important data tables in the ROM. 
disk I/O tables. 



This list does not Include 
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Table Name / Address Contents 



CHRSET / FEC5-FFB3 Default character set (overridden when SOS loads the character 

set from SOS. DRIVER) 

Copyright / FFCO-FFEF Copyright message (contains the initials "JRH" for J. R. "Dick" 

Huston who was a key player behind the /// and SOS) 

NMI / FFFA-FFFB Jump address for the Non-Maskable Interrupt signal 

RESET / FFFC-FFFD Jump address when the /// is powered on 

IRQ / FFFE-FFFF Jump address for the Interrupt Request signal 



ROM USAGE BY SOS 



The Apple /// operating system (SOS = Sophisticated Operating System or Sara's 
OS) uses several ROM routines. These routines seem to all be related to disk block 
I/O. The following discussion is based on SOS version 1.3. 

When the ROM loads block from a SOS disk the ROM is loading the SOS Bootstrap 
Loader program. This program, which is at most 512 bytes in length, uses the 
ROM routine REGRWTS (F000) to read the SOS Loader into memory. This program 
does not test the ROM revision. It is interesting to note that ROM routine BLOCKIO 
is not used, instead a lower-level routine (REGRWTS) is used. 

The SOS Loader determines if the ROM is revision 1 by comparing address FlB9's 
contents against AO (reference: SOS source file SOSLDR.D.SRC). If this comparison 
fails then SOS displays on the screen the error "ROM ERROR: PLEASE NOTIFY YOUR 
DEALER." If the ROM revision is correct then the SOS loader uses the ROM's disk 
I/O routines to read more of SOS into memory. 

The disk /// driver that is built into SOS also uses the ROM to perform disk block 
I/O (reference: DISK3.SRC). It is interesting to note that when the disk driver is 
initialized the driver checks if the ROM revision is or 1. A revision of is 
detected if address F1B9 contains 60. If neither revision is found then the disk 
driver returns an error to SOS (I don't think this will ever happen since the SOS 
loader has already determined that the ROM is revision l). For a valid ROM 
revision the disk driver sets up several jump vectors which point to the 
appropriate addresses in the ROM for the various ROM routines needed by the disk 
driver. Therefore, the disk driver seems compatible with either ROM revision 
whereas the SOS loader likes only revision 1. 

The .CONSOLE driver source listing appears to not use any ROM routines even 
though the ROM contains 40 and 80 column text routines and keyboard input 
routines. I assume the console driver was much more sophisticated than the 
ROM's text features and so using the ROM routines would not have worked well for 
this driver. I also assume that if the console driver used the ROM that when ROM 
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revision 1 was built the console driver would have had to be changed and Apple 
(smartly) did not want to do this. 

6 MONITOR COMMANDS 

Holding down the Open Apple and Control keys when the /// starts or when you 
press the Reset key activates the /// ROM Monitor. The screen will display in the 
upper left corner a small right-facing arrow with a blinking underscore character 
as the cursor. The Monitor's commands are based on the Apple ]['s Monitor 
commands but some commands have changed slightly and others are new for the 
(newer) ///. 

The Monitor supports the following commands: 

addrl.addr2 Dump memory data to screen from address 1 to address 2 and display 

ASCII character at the right of the screen. 

CARRIAGE RETURN Dump next line of addresses to the screen. 



SPACE 

addr:byte_list 
addr: 'text' 
addr:"text" 



Pause current memory dump. Press again to continue. 

Store starting at the address the list of bytes. 

Store text starting at address with high bit clear. 

Store text starting at address with high bit set. 
addr3<addrl.addr2M Move data in addresses 1-2 to address 3. 

addr3<addrl.addr2V Verify data in addresses 1-2 is the same as data starting at address 3. 
byte<addrl.addr2S Search memory in address range 1-2 for the byte. 
block<addrl.addr2W Write address range to disk starting at the disk block. 
block<addrl.addr2R Read disk starting at block to the address range. 



addrG 

addrJ 

U 

X 

ESC-8 

ESC-4 

/ 
CTRL- I 



Call subroutine at the address. 

Jump to the address. 

Call user routine starting at address $03F8. 

Repeat last command line until you press the SPACE BAR. 

Display 80 columns of text. 

Display 40 columns of text. 

Seperate multiple commands on the same line. 

Interrupt current operation, return to Monitor command line. 
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Note: See Wells' Apple /// Entry Poin £s article for a great overview of the ROM 
Monitor, its commands (with some syntax errors), and the memory 
locations that need setting up for the key ROM routines to work. Apple's 
/// 'Service Reference Manual (p >. 13.57) has a list of Monitor commands. 
Anderson's The Apple Nobody Knows also has good Monitor command info. 

To obtain a binary dump of the /// ROM you can do the following: 

1. Initialize a disk on either the /// or an Apple ][ computer. 

2. Insert the new disk in the ///. 

3. Start the /// and hold down the Open Apple and Control keys. 

4. You should be in the /// Monitor. 

5. Type 0<F000.FFFW to write the ROM to disk blocks to 7 

6. Use a disk block reader on the /// or the ][ to read the ROM blocks and save 
them to a real file. 

This disk writing is needed since the ROM does not provide a command for 
redirecting screen output to the ///'s serial port. But, I've read that you can 
output the ROM contents to the Ill's, serial port but this involves using the Monitor 
to write a small program. If anyone has such a program please send a copy my 
way. 

7 A FEW COMMENTS 

I find it interesting, at least from a software engineering perspective, to note that 
in my opinion the /// ROM is missing several key features which I thought any 
system ROM would need. The ROM is missing two features which I think would 
have been useful to Apple and outside /// programmers: 

1) The ROM does not have an explicit version number which exists at a specific ROM 
address. This version number could be used to validate the ROM in case there were 
several different ROMs (as there -were). Apple uses a pseudo ROM version number 
(called the revision number) during the loading of SOS but this is somewhat lame in 
my opinion. 

2) The ROM does not have a dispatch routine for use by the OS or applications that want 
to use ROM routines. This dispatch routine would reside at a specific address (e.g., 
F0O0) and it would take as input a command number and a set of parameters. These 
parameters could be passed via registers or on the stack. This routine would allow 
Apple to change the ROM and ROM "users" would not need to change their 
programming as long as they used the selector routine. The Apple ][ ROM did not have 
such a routine -which caused Apple many headaches when it wanted to change the 
Apple ][ ROM and had to keep lots of routines in their same place. 

3) The ROM source code is rather sparse concerning comments. It would be nice if the 
ROM contained detailed information about what each routine did and how to call the 
routines. Obviously, Apple did not expect anyone but Apple's own programmers to 
ever see the ROM source or use the ROM routines. (I've seen the Lisa computer's ROM 
listing which is much better documented than the ///'s and both are comparable in 
terms of age). 
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8 REFERENCES 

Apple /// ROM Listing - Revision 

This can be found in the Apple /// patent (#4, 383, 296) dated May 1983. Note that 
in places this ROM listing is not always readable. 

Apple /// ROM Listing - Revision 1 

I have a very readable listing of the revision 1 ROM that was printed on a laser 
printer. 

Apple /// Service Reference Manual (Level 2) 

This almost 500 page document by Apple has everything you would want to know 
about the ///'s hardware, low-level software, and how to service a broken ///. 
Includes descriptions of the System Monitor (a.k.a. Development Monitor) [page 
17.3] and the built-in RAM test routine [page 13.51]. 

Apple ///SOS Bootstrap Loader Listing 

Shows how 512 bytes of code are used to load SOS from disk into the ///'s 
memory. 

The following articles provide good ROM information: 

Apple /// Entry Points, Andy Wells, Call- APPLE, October 1981 

Apple /// Dabbling, Rick Smith, Apple Orchard, Summer 1981 

///Bits: John Jeppson's Guided Tour of Highway /// John Jeppson, Softalk, May 1983 

The Apple Nobody Knows, Alan Anderson, Apple Orchard, Fall 1981 

Unlocking the Apple /// - Part 3, Alan Anderson, Apple Orchard, September 1982 

Apple///: 12- Volt 128K Internal Diagnostics, Apple Technical Information Library 

9 DOCUMENT MODIFICATION HISTORY 

30 Nov 1997 Created this document. 

04 Dec 1997 Corrected a few problems, extended the Reference section to 

include more /// articles pertaining to the /// ROM, added this 
section, added section MONITOR COMMANDS. 

### 
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1 INTRODUCTION 

This document provides a general overview of the contents of the Apple /// 
computer ROM revision 1. This information should be used in conjunction with 
a copy of the ROM source code listing. The audience of this document is anyone 
with an interest in the technology of the Apple /// computer's hardware and 
software. 

NOTE 
There were two revisions of the Apple /// ROM, revision and 
revision 1. Revision ROMs had at address F1B9 the value 60. 
Revision 1 ROMs had at address F1B9 the value A0. 

This ROM contains 4 KB of 6502 programming and several data tables. The ROM 
occupies memory addresses F000-FFFF. The basic purpose of the ROM is to test 
the Apple /// computer hardware and boot an operating system from the ///'s 
built-in floppy disk drive. The ROM also contains a simple Monitor program 
whose purpose is to allow the user to interact with the /// at the hexadecimal 
level. 

When the Apple /// computer is turned on the ROM's flow of execution is as 
follows: 

1) The ROM starts execution at the address contained in FFFC-FFFD (RESET) 
which is address F4EE (DIAGN). 

2) Diagnostics (DIAGN/F4EE) starts. The diagnostic first initializes some 
memory for the ROM's use. If the Open Apple key is held down then enter 
the ROM Monitor. Otherwise run several diagnostic checks of the /// 
hardware (tests zero page, sizes memory, initializes screen text buffer, 

Inside the Apple /// Computer ROM • David T Craig • 30 Nov 1997 • 1 / 4 



Page 0127 of 0170 



Apple Computer Inc. Patent : 4_383_296 



tests stack memory, tests ROM checksum, tests VIA chip, tests ACIA chip, 
tests A/D circuitry, tests keyboard connection). Any diagnostic failures 
display an error message and the user has to reset the computer. 

3) Read block (512 bytes) to address A000 from the floppy disk in the built- 
in disk drive (BOOT/F6A1). If no disk is found or block cannot be read 
then display "RETRY" and wait for the user to reset the computer. If the 
block is successfully read then execute the block contents (this is called the 
SOS Bootstrap Loader: see section ROM USAGE BY SOS). 

2 ROM SECTIONS 

Section Address Purpose 

Disk I/O F0O0-F4C4 Read and write floppy disk blocks (512 bytes each) 

Diagnostics F4C5-F7FE Diagnose the /// hardware 

Monitor F7FF-FFFF Interacts with user so user can do simple things 

3 IMPORTANT ROM ROUTINES 

BLOCKIO / F479 Reads or write a disk block (512 bytes), calls routine REGRWTS 
(F000) which reads a sector (256 bytes) from the disk 

BOOT / F6A1 Read floppy disk block *0 into address A000, execute the block 

ENTRY / F901 Monitor entry point 

DIAGN / F4EE Diagnostic entry point 

USRENTRY/F6E6 Tests RAM and displays a table showing chip failures (users 
may execute this routine from the Monitor) 

4 ROM TABLES 

Here's a list of the important data tables in the ROM. This list does not include 
disk I/O tables. 

Table Name / Address Contents 

CHRSET / FEC5-FFB3 Default character set (overridden when SOS loads the 

character set from SOS. DRIVER) 

Copyright / FFCO-FFEF Copyright message (contains the initials "JRH" for J. R. 

Huston who was a key player behind the /// and SOS) 

NMI / FFFA-FFFB Jump address for the Non-Maskable Interrupt signal 

RESET / FFFC-FFFD Jump address when the /// is powered on 
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IRQ / FFFE-FFFF Jump address for the Interrupt Request signal 

5 ROM USAGE BY SOS 

The Apple /// operating system (SOS) uses several ROM routines. These routines 
seem to all be related to disk block I/O. The following discussion is based on SOS 
version 1.3. 

When the ROM loads block from a SOS disk the ROM is loading the SOS 
Bootstrap Loader program. This program, which is at most 512 bytes in length, 
uses the ROM routine REGRWTS (F000) to read the SOS Loader into memory. 
This program does not test the ROM revision. It is interesting to note that ROM 
routine BLOCKIO is not used, instead a lower-level routine (REGRWTS) is used. 

The SOS Loader determines if the ROM is revision 1 by comparing address FlB9's 
contents against AO (reference: SOS source file SOSLDR.D.SRC). If this 
comparison fails then SOS displays on the screen the error "ROM ERROR: PLEASE 
NOTIFY YOUR DEALER." If the ROM revision is correct then the SOS loader uses 
the ROM's disk I/O routines to read more of SOS into memory. 

The disk /// driver that is built into SOS also uses the ROM to perform disk block 
I/O (reference: DISK3.SRC). It is interesting to note that when the disk driver is 
initialized the driver checks if the ROM revision is or 1. A revision of is 
detected if address F1B9 contains 60. If neither revision is found then the disk 
driver returns an error to SOS (I don't think this will ever happen since the SOS 
loader has already determined that the ROM is revision 1). For a valid ROM 
revision the disk driver sets up several Jump vectors which point to the 
appropriate addresses in the ROM for the various ROM routines needed by the 
disk driver. Therefore, the disk driver seems compatible with either ROM 
revision whereas the SOS loader likes only revision 1. 

6 A FEW COMMENTS 

I find it interesting, at least from a software engineering perspective, that the 
ROM is missing some key features which I thought any system ROM would need. 
The ROM is missing two features which I think would have been useful to Apple 
and outside /// programmers: 

1) The ROM does not have an explicit version number which exists at a 
specific ROM address. This version number could be used to validate the 
ROM in case there were several different ROMs (as there were). Apple uses 
a pseudo ROM version number (called the revision number) during the 
loading of SOS but this is somewhat lame in my opinion. 

2) The ROM does not have a selector routine for use by the OS or applications 
that want to use ROM routines. This selector would reside at a specific 
address (e.g., F000) and it would take as input a command number and a 
set of parameters. These parameters could be passed via registers or on 
the stack. This routine would allow Apple to change the ROM and ROM 
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"users" would not need to change their programming as long as they used 
the selector routine. The Apple ] [ ROM did not have such a routine which 
caused Apple many headaches when it wanted to change the Apple ] [ ROM 
and had to keep lots of routines in their same place. 

7 REFERENCES 

Apple /// ROM Listing 

I have a very nice listing of revision 1 ROM. A listing (that is somewhat 
readable) for the earlier revision ROM may be found in the Apple /// patent. 

Apple /// Service Reference Manual (Level 2) 

This almost 500 page book by Apple has everything you would want to Know 
about the ///'s hardware, low-level software, and how to service a broken ///. 
Includes descriptions of the System Monitor (a.k.a. Development Monitor) [page 
17.3] and the built-in RAM test routine [page 13.51]. 

Apple /// SOS Bootstrap Loader Listing 

Shows how 512 bytes of code is used to load SOS from disk into the ///'s 
memory. 

### 
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SOME COMMENTS ABOUT THE 
APPLE /// COMPUTER BOOT ROM 

David T Craig - 27 February 2004 






BACKGROUND 

The Apple /// computer was introduced by Apple Computer in 1980 and was 
discontinued in 1985. 

This computer was a microcomputer with orginally 128 KB of RAM memory 
expandable to 256 KB of RAM. It featured a 4 KB ROM (addressed from $F000 to 
$FFFF hexadecimal) which housed the initial programming that executed when 
the user turned on the computer. This ROM contained programming for the 
following functions: 

+ diagnose hardware circuitry and memory 

+ load and run a disk operating system (i.e. "boot") 

+ provide an interface to a simple monitor program 

The author wrote these comments after looking at the Apple /// ROM listing as 
found in Apple Computer's patent number 4,383,296 dated 10 May 1983. This 
analysis occured during a scanning of the Apple /// patent. 

ROM COMMENTS 

The Apple /// patent's ROM program listing is terrible in terms of printed 
quality. Many parts are very faint and impossible to read. I assume this was 
done on purpose by Apple's legal department so that Apple's competitors would 
not be able to duplicate this ROM programming easily. 
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The ROM programming does not seem to have been built for expansion. By this I 
mean the programming seems to have been written to just make it work and no 
long term thought was given to the ROM programming^ organization. 

There were two versions of the ROM. The Apple /// operating system (OS) 
programming needed to differentiate between the ROM versions since the ROM 
contained several routines which the OS used. This version determination was 
not done in a logical way. A memory location was chosen at random (at least it 
seems this way to me) to serve as the ROM's "version number". The OS had to 
test this "version number" when it needed to use specific ROM services. 

The ROM version also determined the location of several ROM routines which 
the Apple ///OS used. 

The ROM's organization could have been improved greatly in my opinion if it 
was organized differently. At the beginning of the ROM address space ($F000) 
include a short header containing the following: 

$F000 - ROM version number 

$F001 - ROM size (K bytes) 

$F002 - ROM checksum (2 bytes) 

$F003 - ROM routine dispatch jump vector (3 bytes) 

$F006 ■ ROM copyright notice (e.g. "(c) Apple Computer 1980") 

The remainder of the ROM would have contained whatever programming and 
table data was needed. 

The routine dispatch jump vector would be a standard jump instruction to a 
routine in the ROM whose purpose would be to let outside programs sucti as the 
operating system, device drivers, or even application programs access ROM 
routines in a ROM version independent manner. The dispatch routine would 
take as input a command number (in say the CPU's A register) and return result 
information in the CPU's X and Y registers. The A register on return would 
contain an error result with meaning no error. Or, some fixed memory area 
could be use to handle ROM routine parameters. This dispatch mechanism 
could be seen as a BIOS (basic input output system). 
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Possible dispatch routines could be: 

+ Restart or Cold start or Warm start the computer 

+ Read a block from a disk drive 

+ Write a block to a disk drive 

+ Return size in blocks of a disk drive 

+ Checksum the ROM for diagnostic purposes 

+ Test computer's RAM memory for diagnostic purposes 

+ Enter the Apple /// Monitor program 

This dispatch mechanism would have simplified the Apple ///OS use of the 
ROM services since the ROM would always be accessed from just one address 
($F003). If the OS requested a ROM service which was unavailable (e.g. an old 
ROM was installed) then the ROM would tell the OS that the service did not 
exist via a dispatch error result. 



CONCLUSION 

Hopefully this little commentary provides some useful information to its 
reader. If you are interested in the Apple /// computer you should see its 
patents (one is for the Apple ///, the other is for the Apple /// Plus). The first 
patent contains the full ROM listing, but the author has a real digital copy 
which is much more readable. 

Enjoy. 

### 
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1 . PURPOSE 

This document describes some ideas about implementing a software emulator for the 
Apple /// computer. These ideas are based on my experiences with the Apple /// 
computer and its software programming. No specific target machine is mentioned in 
this document since these ideas should be non- target machine specific. These ideas 
are submitted to stimulate thought about such an emulator and hopefully inspire 
someone to produce a working Apple /// emulator. 

The technical details behind the Apple /// computer, its operating system (SOS) , and 
/// programs (e.g. AppleWriter ///) are based on my extensive collection of /// 
technical manuals, specification sheets, and many /// technical articles (Dr. John 
Jeppson's articles are very exhaustive and full of lots of neat /// techoid stuff). 
I have around 15 Apple manuals, the majority of which were published by Apple, which 
include user manuals and the technical programming manuals. 

For those people seriously interested in implementing an Apple /// emulator program I 
highly recommend that they have at least the Apple /// Service Reference Manual. 
This manual, which is almost 500 pages long, is the definitive reference for how the 
Apple /// computer works. Most of its contents describe theory of operation even 
though its title suggests service- type information only. The important features of 
this manual for a /// emulator writer are the /// memory map and the /// memory 
mapped I/O locations. 

1 also own an Apple /// computer which still today works very well. I programmed the 
/// many moons ago and have worked professionally as an Apple Macintosh computer 
programmer since 1984. 

Note: All comments are welcome. If you have anything to add or correct please let me 
know and I will update the master copy of this document. 

2 . EMULATOR GOALS 

The /// emulator should provide a complete emulation environment for the faithful 
execution of Apple /// and /// Plus programs. As far as the emulator user is 
concerned when they run the emulator program their computer should work just like an 
Apple /// computer and all /// visual fidelity should be maintained. Emulation of 
the Apple /// Plus computer may also be supported (this means the /// Plus' 
interlaced screen) . If the /// Plus is supported by the emulator you may want to let 
the user specify if they want to run a /// or a /// Plus. 

I think it would be beyond neat if the emulator could run Apple's running horses demo 
and the other /// demos. 

The /// emulator should support an Apple /// computer with at least 256K of memory 
and four floppy 140K disks (.Dl, .D2, .D3, .D4) . Support for 512K of memory may also 
exist since the ///'s operating system (SOS) supports up to 512K of memory. Memory 
size, if variable, should always be a multiple of 32K. I believe the lowest memory 
size supported by the /// (ROM?) is 96K. Support for a ProFile disk may also exist 
(for this disk there would need to be a disk image with a size of 5M) . The first 
floppy disk (.Dl) would correspond to the floppy disk drive that is built into the 
Apple ///. The other disks correspond to external disks and should exist as image 
files with specific file names (e.g. "Apple 3 Dl", "Apple 3 D2", etc). The ProFile 
disk image file should also have a specific file name (e.g. "Apple 3 ProFile"). 

Image file names should have an extension (e.g. ".D3I") since this is needed by PCs. 

3 . EMULATOR USER INTERFACE 

When the user runs the Apple /// emulator program the user should see on their 
computer screen a screen (or a window representing the screen on GUI systems) 
corresponding to the ///'s screen which the user would see if they were in front of a 
real Apple /// computer. All /// text and graphic modes should be supported by the 
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/// emulator (this includes the special modes supported by the /// Plus and its 
interlaced screen architecture) . 

I recommend that the emulator also support a screen dump facility that writes the 
current /// screen to either a text file (for text modes) or to a graphic file (for 
graphic modes) or always just creates a graphic file. The screen dump graphic file 
should be a standard graphic file for whatever target machine your support (e.g. on 
the IBM PC running Windows produce .BMP files, on the Apple Macintosh produce PICT 
files) . Since the /// supports custom character sets dumping the screen to a PICT 
file (or to the target computer's clipboard) may be the best solution. 

The emulator screen if implemented in a GUI window may also display a status area at 
the bottom of the window. This status area would display at least two lines of text 
and would keep the user informed of what the emulator was doing internally. 

4 . DISK IMAGES 

The /// emulator should read disk image files which correspond directly to real /// 
140K disks. When the /// emulator starts it should look in its folder and if there 
exists a /// disk image file the emulator should boot this image. If there are 
multiple disk image files then the emulator may want to display a list of these 
images and have the user select an image to boot. 

The disk images should be exact copies of real /// disks. To make copies of these 
disks there should exist an utility program that runs on the /// computer and which 
outputs disk block data to the /// serial port (I plan to make this utility and call 
it DTCDumpIt) . This utility's output should be a hex/ascii dump that specifies block 
numbers and has a checksum for each line of data. This utility should ask the user 
if it should dump a file or a disk. 

On the target machine there should exist a similar utility that inputs the disk block 
data and creates a disk image file. I recommend that the transmitted disk block data 
consist of a hex dump with block number and checksum information in a human readable 
fashion. The receiving program (on the target computer) would read this human 
readable information, verify that the data was sent correctly, and produce binary 
disk image file images (I plan to create this utility for the Apple Macintosh and 
call it DTCMake///DiskImage) . 

There should also exist a disk image file for the ///'s Boot ROM (recommended file 

name: "Apple 3 Boot ROM") . This image should contain the 4K ROM image. This ROM 

should be the Revision 1 ROM (not Revision 0) since this was the last ROM produced 
and SOS 1.3 (the last SOS) requires this ROM. 

Users should also be able to format a disk image by specifying the disk drive device 
name (e.g. . D2) . Users should then be able to name the disk image so that they can 
use it later. Users should be able to assign specific disk images to specific disk 
drives . 

I recommend that all disk image files have a very specific internal format. This 
format should support the verification of disk image files so that if a disk image 
file becomes corrupted in some fashion the /// emulator can detect this corruption, 
not use the image, and alert the user. 

Note: Support for existing Apple ] [ disk image files may be feasible but I recommend 
against this since the format of these images could change. 

The proposed image format: 

The disk image file contains two parts, a header part and a data part. The header 
part appears first followed by the data part. The header part contains 
identification and verification information. The data part contains the actual disk 
blocks for the /// disk. This file contains only text, no binary data appears here 
in any fashion. The only non-text information that can appear in these files is the 
Carriage Return (CR) and the Line Feed (LF) characters. The emulator should ignore 
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LFs if appropriate. All information appears in lines with a maximum length of 255 
characters. Character case is immaterial. Blank lines are ignored. The reason for 
this format is so these image files can be transferred over the internet without the 
need for any binary- to -text conversion. Also, text-only files can easily be viewed 
by people using a word processor. 

The header part contains : 

Line Comments 

Signature "APPLE /// DISK IMAGE" 

Version "VERSION" version number (e.g. "1") 

Image Name "IMAGE NAME" name of image, anything the user wants, 

most likely the name of the interpreter on the disk, 

e.g. "Apple Writer ///" 

Creation Date "CREATED" date image file created, "YYYY-MM-DD" 

Created by Name "CREATED BY" name of person or company who created this image 

Comment "COMMENT" comment for anything user wants 

Data Size "DATA SIZE" size of data part (decimal, e.g. "143360") 

Data Checksum "DATA CHECKSUM" hexadecimal checksum (e.g. "FA7C3188") 

Reserved 1 "RESERVED" 

Reserved 2 "RESERVED" 

Reserved 3 "RESERVED" 

Reserved 4 "RESERVED" 

Tech Comment "TECH COMMENT" name of program that this is for 

Header Checksum "HEADER CHECKSUM" hexadecimal checksum (e.g. "B97C31D5") 

Notes: 

The checksum should be calculated as the exclusive-OR of each byte followed by a left 
rotation of 1 bit. Checksum starts with zero. Checksums should always be 4 bytes in 
size and be stored in the header as an 8 character string. 

The Tech Comment's purpose is to allow people who obtain an image file to be able to 
contact someone about the file's purpose. 

The data part contains lines representing 16 bytes from the original disk. Each line 
has a specific format which begins with the starting disk address for the line, 16 
bytes, the ASCII equivalent of the 16 bytes, and a checksum for the bytes of the line 
with the format: 

[00000000] 0123 4567 89ab cdef 0123 4567 89ab cdef [1234567890123456] 12345678 

The last line of the file must be the word "FINIS". 

Sample disk image file: 

APPLE /// DISK IMAGE 

VERSION 1 

IMAGE NAME Apple Writer /// 

CREATED 1997-10-11 

CREATED BY David T. Craig 

COMMENT Thanks to Paul Lutus 

DATA SIZE 16 

DATA CHECKSUM FA7C3188 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

TECH COMMENT For David Craig's /// Emulator - 71533.606@compuserve.com 

HEADER CHECKSUM B97C31D5 

[00000000] 0123 4567 89ab cdef 0123 4567 89ab cdef [Apple. ///.Emul .. ] FA7C3188 
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FINIS 

5.0 6502 CPU EMULATION 

The heart of the /// emulator should be the emulation of the 6502 CPU. The heart may- 
be referred to as the "6502 engine." The emulator should support all of the 6502 
instructions, the 6502 registers, and the special Apple /// registers (e.g. the bank 
switch register, the environment register, and the zero-page register) . Special 
register descriptions and usage can be found in the Apple /// SOS Reference Manual. 

The 6502 engine must be smart about accessing memory and use the bank switch and 
environment registers correctly. 

If this level of the /// emulation is complete and robust the rest of the /// 
emulator should work much more easily. 

Support for special /// features may also exist at this level of the /// emulator. 
For example, the /// emulator may not want to emulate all of the ///'s memory-mapped 
I/O features, but instead intercept access to special areas or routines and call the 
target machine's operating system to handle these features. See sections ROM 
EMULATION and MEMORY-MAPPED I/O EMULATION for more details. 

6 . ROM EMULATION 

The /// emulator should also support as much as possible the ///'s Boot ROM. This 
means the Boot ROM's routines should work for the most part as-is. 

Note: I have a listing of the Boot ROM which could be useful for this emulation 
discussion. 

For the Boot ROM's floppy disk I/O support I recommend that all the gory details here 
not be supported directly at the memory - mapped I/O level but instead the /// emulator 
should emulate this I/O. Specifically, the /// emulator should intercept any access 
to the Boot ROM routines which read or write disk blocks and use the appropriate 
target machine operating system routines to accomplish this feature. 

The /// emulator should also initialize the ROM's character set which the ROM 
normally loads into a special RAM chip that is not accessible to the ///'s 6502 
processor. See section MEMORY BANK SWITCHING EMULATION for more details. 

7 . MEMORY - MAPPED I /O EMULATION 

All memory-mapped I/O locations that in some way deal with the physical world need to 
be handled by the /// emulator. These areas include such addresses as the speaker 
addresses. The Apple /// Service Reference Manual provides detailed information 
about these addresses . 

All accesses to memory by the /// emulator must respect the bank switch and 
environment register settings so that the emulator does not try to access a memory- 
mapped address when that address is not mapped into the 6502 address space. 

Programs which access low- level I/O locations such as the disk I/O addresses should 
not be supported. I assume most /// programs will access hardware components using 
SOS or device drivers . 

Note: Chris Smolinski says that emulating the low- level stuff on a Power PC -based 
Macintosh is not very difficult and works rather fast (he's implemented in his SARA 
emulator the ///'s floppy disk I/O). 

8 . MEMORY BANK SWITCHING EMULATION 

The /// emulator must also fully support the ///'s bank switched and enhanced 
indirect addressing memory architecture. Detailed descriptions and usage of /// 
memory handling can be found in the Apple /// SOS Reference Manual. 
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The /// emulator should also support the ///'a character set RAM chip. This holds 
the bitmap descriptions of each of the 128 characters in the /// character. This RAM 
area, which is not accessible to the ///'s 6502 CPU, holds 1024 bytes. See the Apple 
/// Standard Device Drivers Manual (Console Character Sets section) for more 
information. 

Note: I believe the storage of the Boot ROM character set is different than the 
storage of the character set in the SOS. DRIVER file. I believe the ROM character set 
has bits that are reversed compared to the SOS. DRIVER character set. 

The storage of text and graphics in memory should be supported also. This should 
happen automatically when a /// program writes to the text /graphic memory buffers. 
The emulator needs to detect such writes and update its screen as appropriate. 

9 . SOS SYSTEM CALL EMULATION 

The majority of system calls to SOS and its drivers should most likely not be 
intercepted by the /// emulator. But certain calls may need to be intercepted unless 
a lower level of the /// emulator intercepts these feature already. System calls to 
SOS or drivers that may need intercepting by the /// emulator could be: 

o Disk I/O (.D[l-4] and .PROFILE drivers) 

o Keyboard I/O (.CONSOLE driver) 

o Screen I/O (.CONSOLE and .GRAPHIC drivers) 

o Sound generation (.AUDIO driver) 

o Serial port I/O (.RS232 driver) 

o Silentype Printer (.SILENTYPE) [I'm not sure about support for this] 

Clock I/O (Y2K dates may be a problem) 

1 recommend that the /// emulator intercept all activity dealing with the above and 
have the target machine perform the equivalent features. For example, to read or 
write a disk block the /// emulator should have a routine that accesses the 
appropriate location in the disk image file. 

The /// emulator may also provide the user with some type of setup options so that 
the user can specify specific properties of some of the above drivers. For example, 
if the target machine supports several output ports the emulator may let the user 
specify which port to use (e.g. for the .PRINTER driver the user could assign it to a 
specific serial or parallel port on the target machine) . 

Note: The ///'s clock does not support the year 2000 or greater. I think the 
emulator should support Y2K dates but I'm not sure if SOS's file system date stamps 
will support this easily. 

10.0 DEVICE DRIVER EMULATION 

This section is for the most part handled by my comments in section SOS SYSTEM CALL 
EMULATION. I suspect the programming within the /// emulator for this area could be 
the most work since there are lots of device drivers that make up a simple Apple /// 
configuration . 

One area of device drivers that the /// emulator may not want to emulate is interrupt 
handling. Since the emulator does not have physical devices connected to it in any 
direct fashion I don't think interrupts exist as far as the emulator is concerned. 
Interrupts dealing with disks or the keyboard can be handled at a lower level by 
having the /// emulator call the appropriate system call in the target machine. 
These low- level I/O handlers should set up the appropriate driver data areas so that 
the rest of the ///'s software (SOS and the interpreter) will work correctly. For 
example, keyboard I/O should be setup in the /// emulator so that when the keyboard 
input memory-mapped I/O location is accessed the target machine OS really reads the 
keyboard and sets up the memory-mapped location as appropriate. 

11 . KEYBOARD SUPPORT 
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11.1 User interface support 

The /// computer's keyboard layout is basically compatible with modern keyboards. 
The /// keyboard does have two extra keys, Open Apple and Closed Apple which are 
positioned to the left of the Apple /// keyboard. Also present on the keyboard are 
four arrow keys. The emulator should support these keys either directly (i.e., the 
target machine has similar keys) or associate other keys with the ///'s special keys 
(e.g., the Macintosh computer's two Option keys could be used to simulate the special 
Open and Closed Apple keys) . The emulator's associated keys need not physically be 
in the same location as the ///'s special keys but having them in the general area 
will be beneficial. 

Note: The /// Plus keyboard contains an extra key. Delete, compared to the /// 
keyboard . 

11.2 Low- level access 

The /// emulator should handle low- level access to the keyboard memory-mapped I/O 
locations as detailed in section DEVICE DRIVER EMULATION. 

12 . MONITOR SUPPORT 

The emulator should support the Apple's built-in ROM Monitor. Entry to the Monitor 
should be similar to how this is done on a real /// (at startup if Open Apple and 
Control keys are pressed) . The code in the ROM which tests for Monitor entry should 
work. 

13 .0 APPLE ] [ EMULATION DISK SUPPORT 

It would be nice if the /// emulator supported the Apple ] [ Emulation Disk. I'm not 
sure of what would be involved here but suspect that if the ///'s 6502 CPU and the 
memory-mapped I/O locations are robustly supported that the ] [ emulation should work 
also without any special additional /// emulation features. 

Special consideration may need to be given to Apple /// keyboard keys which do not 
exist in the Apple ] [ world. ] [ emulation details can be found in the Apple /// 
Owner's Guide and the Apple /// Service Reference Manual. 

Note: I have a disassembled listing of the Apple ] [ Emulation Disk ROM source listing 
which could prove useful in this area. 

Further analysis of the ] [ emulation disk's boot sequence needs to be done since I'm 
unknowledgable about this area. Also, I've heard that the ] [ emulation accesses an 
I/O location which disables some /// features. 

14.0 WHAT LANGUAGE SHOULD THE /// EMULATOR BE WRITTEN IN? 

I highly recommend that the /// emulator be written in a high level language such as 
Pascal or C. This should make the emulator more compatible with different target 
computers and make development and maintenance of the emulator much easier. I 
recommend avoiding low- level languages such as assembly. 

15 . WHAT TARGET MACHINES SHOULD BE SUPPORTED? 

I recommend that the target machine (or machines) for the emulator be machines that 
are commonly used today by most computer users. This means either the IBM PC or the 
Apple Macintosh machine family. For the PC world I recommend the /// emulator run 
under Windows 95 and Windows NT. For the Macintosh world I recommend the emulator 
run on most Macintosh models which means support the Macintosh 512 and above. Color 
display should also be supported by the /// emulator (for the Macintosh this means 
use Color QuickDraw if the machine supports CQD and if CQD is not supported by a 
Macintosh model use the Classic B/W QD and maybe use patterns as "colors") . 
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Any of these machines should be fast enough to emulate the /// and most likely will 
be too fast in many areas. I recommend some type of speed control be built into the 
emulator so that users can control how fast the emulator works. For many /// 
programs (e.g. AppleWriter /// and VisiCalc ///) emulation speed will be immaterial 
since these programs typically wait for the user to enter data and then do their 
thing. But for programs such as games the user will want to control the emulator 
speed otherwise the game's actions will be super fast and unplayable. 

Some people say that the older machines such as pre -68040 Macintoshs will be too slow 
for a reasonable /// emulator. I would like to see this /// emulator run on a Mac 
512 machine an onwards. Running on a Mac 128 machine seems a problem due to this 
machine's small memory size and should not be supported (if a virtual memory scheme 
was used by the emulator the Mac 128 could be supported but I think having this extra 
level of support in the emulator would not be worth it) . I disagree and am willing 
to wager a small sum that I'm right. 

16.0 EMULATOR DEBUGGING FACILITIES 

The emulator should support a comprehensive built-in debugger. This debugger's 
purpose should be to let the sophisticated emulator user access any part of the 
emulator's /// address space. This should include all of the memory that is 
allocated to the /// as its memory. This memory would encompass the 256K (or 512K) 
of /// RAM, the /// ROM (4K) , the character set RAM (IK), the 6502 registers, and the 
special /// registers (e.g. bank register) . 

This debugger will prove invaluable in diagnosing emulator bugs. Not only will the 
user be able to type commands for the debugger but the emulator will be able to send 
messages to the debugger. 

Logging of all debugger sessions should be stored to a text file for possible 
analysis. This text file would be created when the emulator starts. The log file 
should be appended to by the emulator. Only the user can delete the file. 

The debugger should exist as a separate window that does not in any way affect the 
emulator's main window. This window should display only commands that the user 
enters or replies returned by the debugger. There should not exist a separate window 
area showing things such as the 6502 registers since all such information should 
appear in the debugger log file. The window should support at least 80 columns of 
text and 24 rows. 

The emulator user interface should be based on a simple command line control scheme. 
All commands and command outputs should be text-based. This scheme could be based on 
the ///'s Monitor's commands or on a little more readable command scheme such as in 
Apple's MacsBug debugger. There should be full on-line help that discusses the 
debugger commands in general and each command should also have on-line help 
available. The debugger should show at the beginning of each line a prompt character 
to indicate when it is waiting for a command. I recommend the prompt be the ">" 
character. The debugger should also show a cursor which I recommend to be a black 
square . 

The debugger should support the standard debugging commands such as 
displaying/setting memory, displaying/setting registers, and disassembling 6502 
instructions. This disassembly should support the special SOS BRK call by listing 
the word "BRK/SOS" instead of just "BRK" and following this with the SOS command 
number/name and the parameter list address: 

SOS CO /CREATE 345A 

The user should be able to enable or disable this feature. 

Note: It may be good to also support the Apple ] [ ProDOS command calling scheme in 
case this emulator ever becomes an Apple ] [ emulator. 

The debugger should support break points, single stepping, and timing buckets. The 
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timing buckets would be used in conjunction with break points to record how long a 
sequence of 65 02 instructions took to execute. This can be very useful in locating 
emulator bottlenecks. The debugger supports many break point commands since I have a 
feeling that this facility will be very powerful and useful during the emulator's 
development . 

The debugger should support the collection of statistics about the emulator. I 
recommend tracking how many times specific 6502 opcodes are executed (obviously, the 
debugger would need commands to display and clear this information) . I would also 
track memory accesses on at least a page (256 bytes) basis. 

The debugger should be accessible at any time that the emulator is running. I 
recommend some type of key press combination that the emulator would detect and 
display the debugger window. Once the debugger window is active it should remain on 
the screen until the user closes the window. 

The emulator should also support a special key press combination at emulator startup 
time that activates the debugger just before the /// ROM is run. This can give the 
emulator developer a good way of tracing ROM execution. 

The emulator should activate the debugger if any fatal emulation errors are detected 
and the debugger should show a message detailing the reason for the activation. All 
of these errors display a dump of the 6502 and SOS control registers. Reasons for 
debugger activation from the emulator are: 

1. A program writes to write-protected memory (e.g. SOS's address space). The 
displayed message is "EMULATOR EXCEPTION: WRITING TO WRITE-PROTECTED MEMORY". 

2. A program executes an undefined 6502 instruction (e.g. 6502 opcode $02). The 
displayed message is "EMULATOR EXCEPTION: UNDEFINED 6502 OPCODE". 

When the debugger is initialized (which should be when the emulator starts) the 
debugger should check if a text file named "DDT. TXT" exists. If so, the debugger 
should read each line from this file and execute it. Obviously, this file should 
contain debugger instructions. This can be very useful for setting up commonly used 
break points which if you use many would be tedious to type everytime you wanted to 
use the emulator. 

A memory snapshot facility should also exist. When activated by a debugger command 
this facility would write to the host computer's disk a binary file containing a copy 
of all the /// memory areas. This snapshot should also be readable by the debugger 
so that the user could restart a specific emulation session from the snapshot. 

I recommend the following emulator debugger commands which are based on the /// 
Monitor commands so that these debugger commands will be familiar to Monitor users. 
These commands for the most part have the general syntax of address -command. See my 
document "Inside the Apple /// Computer ROM" for a list of the /// Monitor commands. 
For information about the Apple ] [ Monitor commands, which the /// Monitor commands 
are based upon, see "Apple ] [ Reference Manual" (Chapter 3: The System Monitor, dated 
1981) . 

Addresses appearing in debugger commands may be prefaced by "N/" where N is a bank 
number. For example, to reference address 2000 of bank 4 use 4/2000. If no bank 
number precedes an address the current bank is used. To reference a ROM address use a 
bank "number" of "R", for example "R/F000". To reference a character set address use 
a bank "number" of "C", for example "C/0000". To reference the SOS system bank use 
"S", e.g. "S/1400". ^ ,, / 

Commands should be case- insensitive (none of the UNIX case- sensitivity gobbly-gook) . 

Commands that display more than a screen full of information should either 
automatically pause when the screen is full, or the user can use the SPACE key. 

Note: Commands using ":" may also use ";" which is easier to type since this 
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character does not need the user of the shift key. Same for "<" and "/". 

Most debugger command numeric arguments must be specified in hexadecimal. The 
exception is the X command which supports hexadecimal, decimal, and binary. 

The debugger command parser should be very liberal. This means that users should be 
able to include extra spaces (or no spaces) and the command should be parsable. For 
example, if a command needs a list of bytes the user should be able to enter any of 
the following: "AABBCC", "AA BB CC", " A ABBC C " and the debugger will see these 
as "AABBCC". 

The debugger should also support a command macro facility. This facility allows you 
to define a macro consisting of other debugger commands. Typing the name of the 
macro will then type the commands as if you entered them manually. 

/"' HELP (or ?) CW •K^t^t-i-' 

I Display debugger on-line help for all commands. Help info should be stored in an 
I external text file for easier modification. I recommend that this section of this 
\. document be the help file. CWd ^->vt-' I Kf j 7 """^ "" 

I Example: HELP ,_- xUeOu^ 4.1A. L^{ / f,<,i a * , " . j 

^lOah- . ? ' «* J o v* 1 ^ iM^f.A." .". >lyoy fjl C***d-t /foi ^ [ °"' 

BYE \tyZlf qS "~ C^u-f Sf Cf**L 

Return to the emulator. 
Example: BYE 



CARRIAGE RETURN keypress 

Repeat last command. 

Example: If the last command was HELP and you press the CARRIAGE RETURN key then HELP 
will be displayed and executed again. 

SPACE keypress 

u 2\fs 
Pause current command's output. Press again to continue. 

Example: If a command is executing and you press the SPACE key the comand's output 
will be paused, pressing SPACE again resumes the command's output. Pausing/Resuming 
are done on an output line basis only. 

DELETE keypress 

L- DP 
Stop current command's output. 

Example: If a command is executing and you press this key then the command will stop 
executing and you will be returned to the debugger's prompt. 

rd " " " " " " ik»u \i\k eyl*'*'^ 

Display 6502 registers and /// system control registers. " n | • 

Example: RD y ^ ^ ^ \ &Jl£«»~± 

A=04 X=01 Y=D8 P=30/00000011 S=F8 PC=034A : E=77/01110111 Z=1A B=03 .-^ t - l y^J^ 
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byte : SA 

Set 6502 A register to byte. 
Example: 45:SA ~" ~~ 



byte : SX 

Set 6502 X register to byte. 
Example: 7B:SX -• ' 



byte : SY 

Set 6502 Y register to byte. 
Example: FF:SY 



byte:SP 

Set 6502 P register to byte. 
Example: 56:SP """ 



byte : SS 

Set 6502 S register to byte. 
Example: AA:SS -— ^ " 



word:SPC 

Set 6502 PC register to word. 
Example: 2000 :SPC -— 



byterSE 

Set /// E system control register to byte. 
Example: 34:SE •-"" " 

byte:SZ 

Set /// Z system control register to byte. 
Example: 19:SZ ^ 

byte : SB 

Set /// B system control register to byte. 
Example: 06: SB ^ 
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addrl . addr2 

Dump memory data to screen from address 1 to address 2 and display ASCII character at 
the right of the screen. 

Example fassumes current bank is bank 4): 300. 30F "^ -- — — (■ *> i ' ~ 1 *^' ''• ; 4*i.^ » t' 

| z i • -"■> — lh*-t*-t- ) 

4/0300- B900 080A 0A0A 9900 08C8 D0F4 A62B A909 [F. .d.uy%"&90@. .G] 

ZPAGE 

Dump the contents of the current interpreter's Zero Page (256 bytes). Also supported 
are commands for the Stack Page and the Extend Page: 

SPAGE - stack page 
EPAGE - extend page 

To dump the pages for SOS (and drivers) use the following commands: 

SZPAGE - zero page 
SSPAGE - stack page 
SEPAGE - extend page 

Example : ZPAGE 

Zero Page (interpreter) 

&c ' 2. > i r <* i - ■ ' 

1400- 0123456789ABCDEF 01234567 89ABCDEF 01234567 89ABCDEF 0123456789ABCDEF 
1420- 01234567 89ABCDEF 01234567 89ABCDEF 01234567 89ABCDEF 0123456789ABCDEF 

14E0- 0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEF 0123456789ABCDEF 

addr: bytes 

Store starting at the address the bytes. 

Example: 2000:AA BB CC DD EE FF -- 

2000:AABBCCDDEEFF „. - 

addr : ' text ' 

Store text starting at address (high bit clear) . 

Example: 2000 : 'Hello World' - - ^1. - — -— <- 

2000 : 'David' ' s Dog' -- piis stores) David' s Dog 



addr: "text" 

Store text starting at address (high bit set) . 

Example: 2000 : "Hello World" - ~ V" — * ' i 

2000 : "David' s Dog" . - <Uw Si~ >y ? Wj ,w 

Aoo<>_\ !i*f»'f m \R<![" :i >h]<t_ * A-r. . 

addr3 <addr 1 . addr2M 

Move data in address range to address 3 . 
Example: 2000<3000 .3100M ^- ' 
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addr3<addrl . addr2V 

Verify data in address range equals data starting at address 3. 
Example: 2000<3000. 3100V ~ ' -^ — "" 

Displays either "OK" if the verification suceeds, or "MISMATCH" if the verification 

fails. 

bytes<addrl . addr2S 

Search memory in address range for the bytes. 

Example: AA<3000 . 3100S -- searches for byte AA 

AABBCC<3000.3100S -- searches for bytes AA BB CC 

If a search finds a match then the starting address of the match is displayed, 
otherwise "PATTERN NOT FOUND" is displayed. „ f 

Y/ffl-ctfjU F0* /Ui> fr T ***** 

' text ' <addrl . addr2S 

Search memory in address range for text (high bit clear) . 

Example: ' D' <3000 . 3100S ~- J^_ 
'David' O000.3100S 

"text"<addrl.addr2S 

Search memory in address range for text (high bit set) . 

Example: "D"<3000 .3100S ~~ ' ' 
"David"<3000.3100S ^~ -^^ 

disk.block<addrl.addr2W 

Write address range to disk # disk starting at disk block. If disk # is not present 
then uses disk .Dl. Disk should equal 1, 2, 3, or 4. The address range always ends 
on a block boundary no matter what you type. 

Example: 1 . 117<2000 . 21FFW -- write 512 bytes to disk 1 block $117 

Note: Disk /// disks contain 280 blocks ($118) sot he block range is 0-117 
(hexadecimal) . 

disk.block<addrl.addr2R 

Read from disk # disk starting at block to the address range. If disk # is not 
present then uses disk .Dl. See the W command for more info. 

Example: 1 . 117<2000 . 21FFR Q- read 512 bytes from disk 1 block $117 

V JL- _ _ _ 

disk.block-block:DISK 

Read block range from disk # disk to a special debugger 4K buffer which is not used 
by the emulator. If the typed block range is greater than 4K then only the first 4K 
will be read. You can then examine this buffer's contents either with a hex/ascii 
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dump or with a disassembly (command L) . This command is useful when you want to 
examine a disk's contents. For disassembly purposes, you can specify the logical 
starting address for the buffer. See the DISKBUFFER command. 

To disassemble the special disk buffer (see the L command) use bank X (stands for 
"extra") as part of the disassembly address parameter (e.g. "X/100") . Same for 
dumping memory or whatever commands you want to use with this special buffer. 



Example: 1.0-7 :DISK 



read 8 blocks (0 to 7) from disk 1 



addr: DISKBUFFER 

Set disk buffer starting logical address. Default address is 2000. See the DISK 
command . / 



Example: A0 00 : DISKBUFFER 



RU^ t\ oooo-pffv 



addr 1. addr 2 L 

Disassemble instructions in address range. If only addrl appears then disassemble 20 
instructions. Disassembly includes the opcode cycle count. 

assumes bank 4 is current 



Example 


: 300L 


4/0300- 


A9 CI 


4/0302- 


2 ED FD 


4/0305- 


18 


4/0306- 


69 0A 


4/0308- 


C9 DB 


4/030A- 


DO F6 


4/030C- 


60 


1 


2 


Note: 


Column 1 = 




Column 2 = 




Column 3 = 




Column 4 = 




Column 5 = 




Column 6 = 



X. ' 


(2) 


LDA #$C1 


1 


(5) 


JSR $FDED 


. ' 


(2) 


CLC 


T. ' 


(4) 


ADC #$01 


1 


(3) 


CMP #$DB 


T 


(3) 


BNE $0302 


U' 


(4) 


RTS 



3 4 5 6 (see Note) 

bank register/address 

memory bytes 

ASCII for the memory bytes 

opcode cycle count 

disassembled instructions 

remark character ";" (optional, see DISASMREM) 



L by itself disassembles the next 20 instructions. 



DISASMREM 



Display ";" after each disassembly line that is produced by the L command. Default 
is to not display the remark. Useful if you plan to add comments to a disassembly. 
See also DISASMREMOFF. 

Example: DISASMREM 

DISASMREMOFF 

Turn off DISASMREM. See also DISASMREM. 
Example: DISASMREMOFF 

addrG 
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■- u — mm i 



Call subroutine at the address. 
Example: A000G __ _-^__^ 



addrJ 

Jump to the address. 
Example: A000J 



wordX 

Convert word (or up to 4 hex digits) to hexadecimal, decimal, and binary (X stands 
for "translate") . Prefix character for byte determines its base: .no prefix = hex, . 
= dec, t = binary. 1 ^ ^ ^^ ^_ 

Example: AX -> A(16) 10(10) 0000 0000 0000 1010(2) I?aJU>- V>i.cs')l* 

.10X -> A(16) 10(10) 0000 0000 0000 1010(2) 

tlOlO -> A(16) 10(10) 0000 0000 0000 1010(2) 

FFFFX -> FFFF(16) 65535(10) 1111 1111 1111 1111(2) 



7 



addrl . addr2 : CS 

Calculate and display a checksum for address range. Checksum is a 4 byte quantity 
which is calculated the same as the disk image file checksums. 

Example: 300.500:CS "' ""— - — ._ 

CHECKSUM=AF897 CEE 

addrT 

Trace instructions starting at the address. Each traced instruction displays 
register contents. Press the SPACE to pause the trace, press DELETE to stop the 
trace. The displayed registers contain values _after_ the previously listed command 
executes . 

Example: AOO0T -- assuming bank 4 is current 

4/A000- A9 CI 'X. 1 (2) LDA #$C1 

A=C1 X=01 Y=D8 P=30/00000011 S=F8 PC=A002 : E=77 /01110111 Z=1A B=04 

4/AO02- 20 ED FD '...' (5) JSR $FDED 

A=C1 X=01 Y=D8 P=30/00000011 S=F6 PC=FDED : E=77 /01110111 Z=1A B=04 

Note: Press the DELETE key to stop the trace, SPACE to pause/resume. 

addrSS 

Single step trace starting at the address. After each step pause and wait for user 
to press SPACE to continue or DELETE to stop the single step. 



)Oof) 



& 



Example: AOOOff ) -- assuming bank 4 is current 

4/A000- A9 CI 'X.' (2) LDA #$C1 

A=C1 X=01 Y=D8 P=30/00000011 S=F8 PC=A002 : E=77/01110111 Z=1A B=04 

Note: Press SS by itself to single step the next instruction, or press CARRIAGE 
RETURN to repeat the SS . 
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addr : BF 



Set a break point at address. When address is accessed the debugger is entered and 
displays the registers. Up to 100 break points should be supported. 

Example: A000:BP 

addr : BPC 

Clear break point at address. 
Example: AOO0:BPC 

SOS:BP 

Set a break point when a SOS call is made. This means when the BRK opcode is 
executed. Same as M00:BP. 

Example : SOS : BP 

Mopcode : BP 

Set a break point when opcode is executed. 

Example: M60:BP -- set break point when the RTS instruction (60) is executed. 

ROM:BP 

Set a break point when a call is made to the ROM. 
Example: ROM:BP 

addrl . addr2 : BPW 

Set a break point when any address within address range is written to. BPW = Break 
Point Write. 

Example: 300 .123AR:BPW 

addrl. addr2:BPR 

Set a break point when any address within address range is read from. BPR = Break 
Point Read. s 

Example: 300.123A:BPR ^ /«_ ju-n +- ,y ' 

addr . byte : BPE a ^ft-l . cJcLr 2- t V jit I [^ 1 , , . '«■ [^ ( *1 efiw ( ) 

Set a break point when the address contents equal the byte value. BPE = Break Point 
Equals . . , . . , , \ 

Example: 300.AA:BPE <W" f tltlUr '- n-,* '-") V. 

addr.bytel-byte2:BPE 

Set a break point when the address contents equal a byte value in the byte range. BPE 
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= Break Point Equals . 
Example: 300 .AA-BB:BPE 



iw* f^kAw 4 J 1ft 



addr.bytel byte2 ... :BPEA -JL-^ 

Set a break point when the address contents equal byte 1 value, or equals byte 2 
value, etc. Supports up to 16 byte values. BPEA = Break Point Equals Any. 

Example: 300 .AABBCCDD: BPEA 

300. AA BB CC DD:BPEA 



addrl.addr2.bytelbyte2 ... :BPEA >-<- 

Set a break point when the address range contains any bytes equalling the byte 
values. BPEA = Break Point Equals Any. 

Example: 300 .400 .AABBCCDD: BPEA 



addrl.addr2.bytel-byte2:BPEA '-<-- — 

Set a break point when the address range contents equal the byte range. BPEA = Break 
Point Equals Any. 

Example: 300 . 400 .AA-BB:BPEA 

BPD 

Display break point table. 
Example : BPD 

# Address Range BP Setting 

1 4/2000-4/21FF BPEA AA-BB 

BPC 

Clear break point table. 
Example: BPC 

addrl . addr2 : TB 

Set timing bucket for address range. When address 1 is accessed timing starts. When 
address 2 is accessed timing stops. Up to 100 timing buckets should be supported. 

Example: A000.A1FF:TB 

TBD 

Display timing bucket table. Shows all set timing buckets and the time in l/60th of 
a second and in seconds spent in each bucket. 

Example : TBD 

# Address Range Time (l/60s) Time (sees) 

Some Ideas about an # Apple /// Computer Emulator -- Version 4 
David T Craig - 12 Dec 1997 - 17/23 



Page 0151 of 0170 



Apple Computer Inc. Patent : 4_383_296 



1 4/A000-4/A1FF 34 0.567 

2 4/A300-4/A310 5 0.083 



39 0.650 



addr:TBC 

Clear timing bucket starting at address . 
Example: A00O:TBC 



TBC 

Clear timing bucket table. 
Example: TBC 



error :SOSE 

List SOS general error message for the error number. If no error number is present 
then list all general errors. Error info should be stored in an external text file 
for easier modification. See the SOS Reference Manual for a list of these errors. 

Example: 01:SOSE 

BADSCNUM - Invalid SOS call number 

error :SOSFE 

Display SOS fatal error message for the error number. If no error number is present 
then list all fatal errors. See the SOS Reference Manual for a list of these errors. 

Example: 01:SOSFE 
BADBRK - Invalid BRK 

command : SOS 

Display SOS command name and SOS command area (e.g. file system) for the command 
number. If no command number present then list all SOS command numbers and their 
names. Command info should be stored in an external text file for easier 
modification. See the SOS Reference Manual for a list of these commands. 

Example: CO: SOS 

CREATE (File System) 

SOSON 

Turn on disassembly of SOS calls which displays SOS followed by the command number 
and parameter address. The emulator defaults to this. 

Example: SOSON 
SOSOFF 
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Turns off SOSON. 
Example: SOSOFF 



disk: CAT 

Display catalog of SOS disk stored in disk # disk. Includes recursive list of all 
subdirectories. Should show same file info as Apple's System Utilities program. 

Note: Other commands that may be supported include CATPASCAL for Apple ] [ Pascal 
disks and CATDOS for Apple ] [ DOS disks. This may come in handy if you want to see 
what these disks contain if you have them as disk image files. 

Example: 1:CAT 

disk. file_name: INFO 

Displays information about the specified file in the disk. Information includes 
standard SOS file information but also block list of all index blocks (if any) 
associated with the file and block list of all data blocks for the file. 

Example: 1 .APPLE3 .TEXT: INFO 

disk. block: DUMP 

Display contents of specified disk block in the standard hex/ascii dump format. 
Example: 1.0: DUMP 

disk: DRIVERS 

Display list of contents of the SOS. DRIVER file stored on the disk. List includes 
driver names, driver information, and other items that are in the driver file (e.g. 
character sets) . 

Example: 1: DRIVERS 

disk:CHECKIMAGE 

Check validity of disk image in disk # disk. Computes header and data part checksums 
and compares against the image file's listed checksums. 

Example: 1 : CHECKIMAGE 

DIT 

Display Driver Information Table (DIT) , a data structure maintained by this debugger. 
Contains list of all loaded drivers, their names, sizes, and entry point addresses. 

Example: DIT 

MIT 

Display Memory Information Table (MIT) , a data structure maintained by this debugger. 
See section EMULATOR MEMORY STRUCTURE for what this structure contains. 

Example: MIT 
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OPCODES 

Display a histogram of opcode execution counts. Includes the actual number of the 
counts. Sorted by frequency. Opcodes not executed are listed below the histogram. 

Example : OPCODES 

LDA 2 188 97 3 *********************************************** 
STA 12 123 ****************************** 
QMp 467 ************** 



2,201,563 
Unexecuted opcodes : TXS NOP 



OPCODESCLR 

Reset opcode histogram table. 
Example: OPCODESCLR 



pagel . page2 : MEMORYR 

Display memory write access table. This table lists on a 256 byte page basis counts 
for each time the page was read. If pagel. page2 specified then lists only those 
pages. If a single page is specified then display only that page's access count. 

Examp 1 e : 0.5: MEMORYR 

pagel .page2 : MEMORYW 

Display memory read access table. This table lists on a 256 byte page basis counts 
for each time the page was written. See MEMORYW for page options. 

Examp 1 e : 0.5: MEMORYW 

MEMORYCLR 

Reset both memory access tables. 
Example: MEMORYCLR 

value: SCROLL 'i'X $UZoLL-^o *fU^ c^ <J lu>y'^s W^e '/'U*- r<S^«*" n "/ 

Set debugger display scrolling rate interline delay. Value is in l/10th of a second. -*^U 
Default is no delay (value = 0) . Useful if you want to for example dump lots of 
memory and don't want to mess with the SPACE key to read what is displayed. Set the 
scrolling delay to a comfortable value, sit back, and enjoy the show. 

Example: 10: SCROLL -- sets scrolling delay to 1 second 



filename: LOG 

Close log file, create a new one with filename, and output all debugger displays to 
this new file. Useful if you're running the emulator from a write -protected disk and 
you want to re-direct the output to a writable disk file. 
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Example: MyDiary:LOG 



SNAPSHOTW 

Write the contents of all of the emulator's memory to binary file on the host 
computer's hard disk. This snapshot could prove useful in diagnosing an emulator 
problem. The binary file should be named "Snapshot_YYYYMMDD_HHMMSS.BIN". 



Example: SNAPSHOTW 



SNAPSHOTRfile-name 

Read a snapshot file into the emulator's memory. 

Example: SNAPSHOTR Snapshot_19971225_123456.BIN 

MACRO name commands 

Define a macro name and commands for this macro. You can use any name containing 
alphnumeric characters or periods with a maximum length of 31 characters. Up to 25 
macros may be defined. All commands are verified and if any syntax errors occur you 
will be told and the macro will not be defined. Macro commands cannot include other 
macro commands . 

Example: MACRO my. dump 300.400 A000.A1FF A000L 

MACROL 

List all defined macros. 
Example: MACROL 
# Name / Contents 



1 my . dump 

300.400 A000.A1FF A000L 



I macro -name 

Execute a macro with the name "macro-name". Each command within the macro is 
displayed followed by the commands' display. 

Examp 1 e : ! my . dump 

300.400 

A000.A1FF 

A000L tl^V P I ) J 

ft*JT dx>f^ Cw.r^ ^J lA^if fWlP>*~ (Cy/7 ^W «"^ 

VERSION 

Display debugger version information. Includes version number and creation 
date /time. 
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17 . EMULATOR MEMORY STRUCTURE 

I recommend that the emulator's internal memory structure for the Apple /// memory- 
resources be structured as follows: 

o Memory block containing the size of memory and references to each /// memory bank 
(the references can be whatever is appropriate -- on the Mac these could be Mac 
memory pointers or handles) : 

- number of switchable banks (1..15) 

- reference to bank S (32K: 0000 -1FFF, A000-FFFF) * 

- reference to bank 0/$0 - switchable (32k: 2000-9FFF) 

- reference to bank 1/$1 - switchable (32k: 2000-9FFF) 

- reference to bank 14/$E - switchable (32k: 2000-9FFF) 

- reference to Boot ROM ROM address space (4k: F000-FFFF) 

- reference to Boot ROM RAM address space (4k: F000-FFFF) 

- reference to I/O RAM address space (4k: C000-CFFF) 

* The system (S) bank is always on-line and is never bank switched. SOS and part of 
the interpreter reside here. 

o Memory block containing the 6502 registers: 

- Accumulator (A) 8 bits 

- X index (X) 8 bits 

- Y index (Y) 8 bits 

- Status Register (P) 8 bits 

- Stack Pointer (S) 8 bits 

- Program Counter (PC) 16 bits 

o Memory block containing the special /// System Control Registers: 

- E: Environment Register (FFDF) 8 bits 

- Z: Zero Page Register (FFD0) 8 bits 

- B: Bank Register (FFEF) 8 bits 

18.0 WHAT'S NEXT? 

Persons seriously interested in creating an Apple /// emulator program should try to 
obtain as much /// technical information as possible. The author has lots of info 
which he can copy at minimal charge (10 cents per page plus postage) . These persons 
should also have access to a working Apple /// computer with a fair number of /// 
programs . 

Other areas of compatibility should also be investigated that this document does not 
address . This includes support for other input devices such as the mouse which does 
have a 3rd party driver available. 
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SOS 1.3 

Floppy Bootstrap Loader 

Source Code Listing 



This listing shows the code which is found at the beginning of 

a SOS boot disk. When the Apple /// computer starts the 

computer's ROM loads this code from the floppy disk 

and executes the code. This code loads the Apple Ill's 

operating system, SOS. 
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A000 
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A000 
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A000 




A000 




A000 




A000 




A000 
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A001 


D8 


A002 


A9 77 


A004 


8D DFFF 


A007 




A007 




A007 




A007 


A2 FF 


A009 


9A 


A00A 


2C 10C0 


A00D 


A9 40 


A00F 


8D CAFF 


A012 


A9 07 


A014 


8D EFFF 


A017 


A9 00 


A019 


CE EFFF 


A01C 


8D 0020 


A01F 


AE 0020 


A022 


D0F5 


A024 




A024 




A024 




A024 




A024 




A024 


A9 00 


A02 6 


85 85 


A02 8 


A2 A2 


A02A 


86 86 


A02C 


A2 02 


A02E 


A4 85 


A030 


84 E3 


A032 


A4 86 


A034 


84 E4 


A03 6 
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* APPLE /// BOOTSTRAP LOADER FOR FLOPPY DISK 

* - Disassembled 10-March-1988 by Scott Stinson 

****************************************************** 

\ 



.ABSOLUTE 

.PROC BOOTSTRAPLOADER 

. ORG 0A000 



EQUATES 



ZERO PAGE LOCATIONS 



IBDRVN 


.EQU 


82 


IBTRK 


.EQU 


83 


IBSECT 


.EQU 


84 


IBBUFP 


.EQU 


85 


IBCMD 


.EQU 


87 


IBBUFPTMP 


.EQU 


0E3 


FILECNT 


.EQU 


0E5 


INDXBLKCNT 


.EQU 


0E7 


SOSJMPADR 


.EQU 


0E8 



DRIVE NUMBER 

TRACK NUMBER 

SECTOR NUMBER 

BUFFER POINTER 

COMMAND NUMBER 

BUFFER POINTER TEMPORARY 

FILE COUNT 

INDEX BLOCK COUNT 

SOS JUMP ADDRESS 



HARDWARE I/O ADDRESSES 



SCREENLOC .EQU 0628 
KBDSTROBE .EQU 0C010 
IOBEEP .EQU 0C040 



SCREEN LOCATION 
KEYBOARD STROBE 
I/O BEEP 



GENERAL EQUATES 



f?W\[ 



RETINT 


.EQU 


40 


IDXBLK1 


.EQU 


0C00 


IDXBLK2 


.EQU 


0D00 


LOADADR 


.EQU 


1E00 


OFFSET 


.EQU 


1E08 


FIRSTPAGE 


.EQU 


2000 


MAINBUFF 


.EQU 


0A200 


REGRWTS 


.EQU 


0F000 


SECTABL 


.EQU 


0F4A0 


NMI VECTOR 


.EQU 


0FFCA 


EREG 


.EQU 


0FFDF 


BREG 


.EQU 


0FFEF 


; ENTRY POINT 


ENTRY 


SEI 
CLD 






LDA 


#77 




STA 


EREG 




LDX 


#0FF 




TXS 






BIT 


KBDSTROBE 




LDA 


KRETINT 




STA 


NMIVECTOR 




LDA 


#07 




STA 


BREG 




LDA 


#00 


$010 


DEC 


BREG 




STA 


FIRSTPAGE 




LDX 


FIRSTPAGE 




BNE 


$010 



RETURN FROM INTERRUPT 

INDEX BLOCK 1 

INDEX BLOCK 2 

LOADING ADDRESS 

OFFSET 

FIRST PAGE 

MAIN BUFFER 

READ/WRITE SECTOR ROUTINE 

SECTOR TABLE 

NON-MASKABLE INTERRUPT VECTOR 

ENVIRONMENT REGISTER 

BANK REGISTER 



SET INTERRUPT DISABLE 

CLEAR DECIMAL FLAG 

LOAD ACCUMULATOR WITH $77 

STORE IN ENVIRONMENT REGISTER 

SET 2 MHZ, I/O SPACE ENABLED, SCREEN ENABLED, 

RESET ENABLED, WRITE PROTECT NOT ENABLED, 

PRIMARY STACK, AND ROM SELECTED 

LOAD ACCUMULATOR WITH $FF 

TRANSFER X-REGISTER TO STACK POINTER 

CLEAR KEYBOARD 

LOAD ACCUMULATOR WITH RETURN FROM INTERRUPT 

STORE IN NON-MASKABLE INTERRUPT VECTOR 

LOAD ACCUMULATOR WITH $07 

STORE IN BANK REGISTER 

LOAD ACCUMULATOR WITH $00 

DECREMENT BANK REGISTER 

STORE IN FIRST PAGE OF BANK 

LOAD X-REGISTER WITH FIRST PAGE BYTE 

BRANCH IF BYTE IS NOT EQUAL TO $00 



This section reads in the SOS directory. 



READSOSDIR LDA 


#00 


STA 


IBBUFP 


LDX 


#0A2 


STX 


IBBUFP+1 


LDX 


#02 


RDSOSDIRLP LDY 


IBBUFP 


STY 


IBBUFPTMP 


LDY 


IBBUFP+1 


STY 


IBBUFP TMP+1 


JSR 


READBLK 



LOAD ACCUMULATOR WITH S00-BLOCK HIGH BYTE 

STORE IN BUFFER POINTER LOW BYTE 

LOAD X-REGISTER WITH $A2 

STORE IN BUFFER POINTER HIGH BYTE 

LOAD X-REGISTER WITH $02-BLOCK LOW BYTE 

LOAD Y-REGISTER WITH BUFFER POINTER LOW BYTE 

STORE IN BUFFER POINTER TEMPORARY LOW BYTE 

LOAD Y-REGISTER WITH BUFFER POINTER HIGH BYTE 

STORE IN BUFFER POINTER TEMPORARY HIGH BYTE 

JUMP TO READ A BLOCK FROM FLOPPY DISK DRIVE 
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A039 


A0 02 


A03B 


Bl E3 


A03D 




A03D 


AA 


A03E 


C8 


A03F 


Bl E3 


A041 




A041 


D0EB 


A04 3 




A04 3 


E0 00 


A04 5 




A04 5 


D0E7 


A04 7 




A04 7 




A04 7 




A04 7 




A04 7 




A04 7 




A04 7 


AD 25A2 


A04A 


85 E5 


A04C 


AD 2 6A2 


A04F 


85 E6 


A051 


05 E5 


A053 


D003 


A055 


4C 56A1 


A058 




A058 


A5 E5 


A05A 


D002 


A05C 


C6 E6 


A05E 


C6 E5 


A060 


A9 2B 


A062 


85 85 


A064 


A9 A2 


A06 6 


85 86 


A068 


AE 24A2 


A06B 


CA 


A06C 


A0 00 


A06E 


Bl 85 


A070 




A070 


F01A 


A07 2 


2 9 0F 


A07 4 


CD 92A1 


A07 7 


D013 


A07 9 


A8 


A07A 


Bl 85 


A07C 


D9 92A1 


A07F 


D00B 


A081 


88 


A082 


D0F6 


A084 


Bl 85 


A08 6 




A08 6 


2 9 F0 


A08 8 


C9 20 


A08A 


F032 


A08C 


08 


A08D 


CA 


A08E 


F010 


A090 


18 


A091 


A5 85 


A093 


6D 23A2 


A09 6 


85 85 


A09 8 


A5 86 


A09A 


6 9 00 


A09C 


85 86 


A09E 


D009 


A0A0 


A9 04 


A0A2 


85 85 


A0A4 


E6 86 


A0A6 


AE 24A2 


A0A9 


28 


A0AA 


F0C0 


A0AC 


38 


A0AD 


A5 E5 


A0AF 


E9 01 


A0B1 


85 E5 


A0B3 


A5 E6 


A0B5 


E9 00 


A0B7 


85 E6 


A0B9 


B0B1 


A0BB 


4C 56A1 


A0BE 




A0BE 




A0BE 




A0BE 




A0BE 




A0BE 




A0BE 


A0 11 


A0C0 


Bl 85 


A0C2 


AA 


A0C3 





LDY 

LDA 

TAX 

INY 
LDA 

BNE 

CPX 

BNE 



#02 
@IBBUFPTMP,Y 



@IBBUFPTMP,Y 
RDSOSDIRLP 
#00 
RDSOSDIRLP 



LOAD Y-REGISTER WITH $02 

LOAD ACCUMULATOR WITH NEXT BLOCK TO READ LOW 

BYTE 

TRANSFER ACCUMULATOR TO X-REGISTER 

INCREMENT Y-REGISTER 

LOAD ACCUMULATOR WITH NEXT BLOCK TO READ HIGH 

BYTE 

BRANCH IF NEXT BLOCK TO READ HIGH BYTE IS NOT 

EQUAL TO ZERO 

CHECK TO SEE IF NEXT BLOCK TO READ LOW BYTE IS 

ZERO 

BRANCH IF NEXT BLOCK TO READ LOW BYTE IS NOT 

EQUAL TO ZERO 



This section searches the SOS directory for the SOS. KERNEL file. 



SRCHSOSKER 


LDA 


MAINBUFF+25 




STA 


FILECNT 




LDA 


MAINBUFF+2 6 




STA 


FILECNT+1 




ORA 


FILECNT 




BNE 


$010 




JMP 


WRNTFNDERR 


$010 


LDA 


FILECNT 




BNE 


$020 




DEC 


FILECNT+1 


$020 


DEC 


FILECNT 




LDA 


#2B 




STA 


IBBUFP 




LDA 


#0A2 




STA 


IBBUFP+1 




LDX 


MAINBUFF+24 




DEX 




SRCHLP 


LDY 


#00 




LDA 


@IBBUFP,Y 




BEQ 


$020 




AND 


#0F 




CMP 


FLNMELEN 




BNE 


$020 




TAY 




$010 


LDA 


@ IBBUFP, Y 




CMP 


FLNME-l.Y 




BNE 


$020 




DEY 






BNE 


$010 




LDA 


@ IBBUFP, Y 




AND 


#0F0 




CMP 


#20 




BEQ 


READIDXBLK 


$020 


PHP 
DEX 






BEQ 


$030 




CLC 






LDA 


IBBUFP 




ADC 


MAINBUFF+2 3 




STA 


IBBUFP 




LDA 


IBBUFP+1 




ADC 


#00 




STA 


IBBUFP+1 




BNE 


$040 


$030 


LDA 


#04 




STA 


IBBUFP 




INC 


IBBUFP+1 




LDX 


MAINBUFF+24 


$040 


PLP 






BEQ 


SRCHLP 




SEC 






LDA 


FILECNT 




SBC 


#01 




STA 


FILECNT 




LDA 


FILECNT+1 




SBC 


#00 




STA 


FILECNT+1 




BCS 


SRCHLP 




JMP 


WRNTFNDERR 



LOAD ACCUMULATOR WITH FILE COUNT LOW BYTE 

STORE IN FILE COUNT LOW BYTE 

LOAD ACCUMULATOR WITH FILE COUNT HIGH BYTE 

STORE IN FILE COUNT HIGH BYTE 

OR ACCUMULATOR WITH FILE COUNT LOW BYTE 

BRANCH IF FILE COUNT IS NOT EQUAL TO ZERO 

JUMP TO WRITE NOT FOUND ERROR MESSAGE TO 

SCREEN 

LOAD ACCUMULATOR WITH FILE COUNT LOW BYTE 

BRANCH IF NOT EQUAL TO $00 

DECREMENT FILE COUNT HIGH BYTE 

DECREMENT FILE COUNT LOW BYTE 

LOAD ACCUMULATOR WITH $28 

STORE IN BUFFER POINTER LOW BYTE 

LOAD ACCUMULATOR WITH $A2 

STORE IN BUFFER POINTER HIGH BYTE 

LOAD X-REGISTER WITH ENTRIES PER BLOCK 

DECREMENT X-REGISTER 

LOAD Y-REGISTER WITH $00 

LOAD ACCUMULATOR WITH STORAGE TYPE AND NAME 

LENGTH BYTE 

BRANCH IF EQUAL TO ZERO 

MASK OFF BITS 4,5,6,7 

COMPARE WITH FILE NAME LENGTH 

BRANCH IF NOT EQUAL TO ZERO 

TRANSFER NAME LENGTH TO Y-REGISTER 

LOAD ACCUMULATOR WITH FILE NAME BYTE 

COMPARE WITH FILE NAME BYTE 

BRANCH IF NOT EQUAL 

DECREMENT NAME LENGTH 

BRANCH IF NAME LENGTH NOT EQUAL TO ZERO 

LOAD ACCUMULATOR WITH STORAGE TYPE AND NAME 

LENGTH BYTE 

MASK OFF BITS 0,1,2,3 

COMPARE WITH $20 FOR SAPLING FILE 

BRANCH IF EQUAL TO READ INDEX BLOCK 

PUSH PROCESSOR STATUS ON STACK 

DECREMENT ENTRIES PER BLOCK 

BRANCH IF ENTRIES PER BLOCK IS EQUAL TO ZERO 

CLEAR CARRY 

LOAD ACCUMULATOR WITH BUFFER POINTER LOW BYTE 

ADD ENTRY LENGTH LOW BYTE 

STORE IN BUFFER POINTER LOW BYTE 

LOAD ACCUMULATOR WITH BUFFER POINTER HIGH BYTE 

ADD $00 

STORE IN BUFFER POINTER HIGH BYTE 

BRANCH ALWAYS 

LOAD ACCUMULATOR WITH $04 

STORE IN BUFFER POINTER LOW BYTE 

INCREMENT BUFFER POINTER HIGH BYTE 

LOAD X-REGISTER WITH ENTRIES PER BLOCK 

PULL PROCESSOR STATUS FROM STACK 

BRANCH IF NOT EQUAL TO ZERO 

SET CARRY 

LOAD ACCUMULATOR WITH FILE COUNT LOW BYTE 

SUBTRACT $01 

STORE IN FILE COUNT LOW BYTE 

LOAD ACCUMULATOR WITH FILE COUNT HIGH BYTE 

SUBTRACT $00 

STORE IN FILE COUNT HIGH BYTE 

BRANCH IF MORE FILE ENTRIES 

JUMP TO WRITE NOT FOUND ERROR MESSAGE TO 

SCREEN 



This section reads in the index block of the SOS. KERNEL file. 



READIDXBLK LDY 
LDA 
TAX 



#11 
8IBBUFP,Y 



LOAD Y-REGISTER WITH $11 

LOAD KEY POINTER LOW BYTE 

TRANSFER ACCUMULATOR TO X-REGISTER-BLOCK LOW 

BYTE 
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86 
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20 
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A0D1 






A0D1 






A0D1 


AE 


00 0C 


A0D4 


AD 


000D 


A0D7 


A0 


00 


A0D9 


84 


85 


A0DB 


A0 


IE 


A0DD 


84 


86 


A0DF 


20 


1DA1 


A0E2 






A0E2 






A0E2 






A0E2 






A0E2 






A0E2 






A0E2 






A0E2 


A0 


08 


A0E4 


B9 


FF1D 


A0E7 


D9 


9CA1 


A0EA 


F003 


A0EC 


4C 


6AA1 


A0EF 






A0EF 


88 




A0F0 


D0F2 


A0F2 






A0F2 






A0F2 






A0F2 






A0F2 






A0F2 






A0F2 


A9 


01 


A0F4 


85 


E7 


A0F6 


A4 


E7 


A0F8 


BE 


000C 


A0FB 


B9 


000D 


A0FE 


D004 


A100 


E0 


00 


A102 






A102 


F007 


A104 


20 


1DA1 


A107 


E6 


E7 


A109 


D0EB 


A10B 






A10B 






A10B 






A10B 






A10B 






A10B 






A10B 


18 




A10C 


A9 


0E 


A10E 


6D 


081E 


Alll 


85 


E8 


A113 


A9 


IE 


A115 


6D 


091E 


A118 


85 


E9 


AHA 


6C 


E800 


A11D 






A11D 






A11D 






A11D 






A11D 






A11D 






A11D 






A11D 


86 


83 


A11F 


4A 




A120 


66 


83 


A122 


4A 




A123 


66 


83 


A125 


4A 




A126 


66 


83 


A128 


8A 




A129 






A129 


29 


07 


A12B 


AA 




A12C 


BD 


A0F4 


A12F 


85 


84 


A131 


A9 


01 


A133 


85 


87 


A135 


A9 


00 


A137 


85 


82 



INY 




LDA 


@IBBUFP,Y 


LDY 


#00 


STY 


IBBUFP 


LDY 


#0C 


STY 


IBBUFP+1 


JSR 


READBLK 



INCREMENT Y-REGISTER 

LOAD KEY POINTER HIGH BYTE 

LOAD Y-REGISTER WITH $00 

STORE IN BUFFER POINTER LOW BYTE 

LOAD Y-REGISTER WITH $0C 

STORE IN BUFFER POINTER HIGH BYTE 

JUMP TO READ A BLOCK FROM FLOPPY DISK DRIVE 



This section reads in the first block of the SOS. KERNEL file. 



RD1SOSKER 


LDX 


IDXBLK1 




LDA 


IDXBLK2 




LDY 


#00 




STY 


IBBUFP 




LDY 


#1E 




STY 


IBBUFP+1 




JSR 


READBLK 



LOAD X-REGISTER WITH INDEX BLOCK LOW BYTE 

LOAD ACCUMULATOR WITH INDEX BLOCK HIGH BYTE 

LOAD Y-REGISTER WITH $00 

STORE IN BUFFER POINTER LOW BYTE 

LOAD Y-REGISTER WITH $1E 

STORE IN BUFFER POINTER HIGH BYTE 

JUMP TO READ A BLOCK FROM FLOPPY DISK DRIVE 



This section does a verification of the SOS. KERNEL file to make 
sure it is the proper SOS. KERNEL file. It checks for "SOS KRNL" in 
the first 8 bytes of the file. 



FLVRFY 


LDY 


#08 


FLVRFYLP 


LDA 


LOAD ADR- 1, Y 




CMP 


FLVERIFY-1,Y 




BEQ 


$010 




JMP 


WRINKERERR 


$010 


DEY 






BNE 


FLVRFYLP 



LOAD Y-REGISTER WITH $08 

LOAD ACCUMULATOR WITH BYTE FROM SOS. KERNEL 

COMPARE WITH VERIFICATION BYTE 

BRANCH IF EQUAL 

JUMP TO WRITE INVALID KERNEL ERROR MESSAGE TO 

SCREEN 

DECREMENT Y-REGISTER 

BRANCH IF NOT EQUAL TO ZERO TO CHECK REST OF 8 

SOS. KERNEL BYTES 



This section reads in the SOS. KERNEL file. 



RDSOSKER 


LDA 


#01 




STA 


INDXBLKCNT 


RDSOSKELP 


LDY 


INDXBLKCNT 




LDX 


IDXBLK1, Y 




LDA 


IDXBLK2, Y 




BNE 


$010 




CPX 


#00 




BEQ 


JUMPSOSKER 


$010 


JSR 


READBLK 




INC 


INDXBLKCNT 




BNE 


RDSOSKELP 



LOAD ACCUMULATOR WITH $01 

STORE IN INDEX BLOCK COUNT 

LOAD Y-REGISTER WITH INDEX BLOCK COUNT 

LOAD X-REGISTER WITH BLOCK LOW BYTE 

LOAD ACCUMULATOR WITH BLOCK HIGH BYTE 

BRANCH IF BLOCK HIGH BYTE IS NOT EQUAL TO ZERO 

CHECK TO SEE IF BLOCK LOW BYTE IS NOT EQUAL TO 

ZERO 

BRANCH IF BLOCK LOW BYTE IS NOT EQUAL TO ZERO 

JUMP TO READ A BLOCK FROM FLOPPY DISK DRIVE 

INCREMENT INDEX BLOCK COUNT 

BRANCH IF INDEX BLOCK COUNT IS NOT EQUAL TO 

ZERO TO READ MORE OF THE SOS. KERNEL 



This section jumps to the SOS. KERNEL loader. 



JUMPSOSKER CLC 




LDA 


#0E 


ADC 


OFFSET 


STA 


SOSJMPADR 


LDA 


#1E 


ADC 


OFFSET+1 


STA 


SOSJMPADR+1 


JMP 


eSQSJMPADR 



CLEAR CARRY 

LOAD ACCUMULATOR WITH $0E 

ADD OFFSET LOW BYTE 

STORE IN SOS JUMP ADDRESS LOW BYTE 

LOAD ACCUMULATOR WITH $1E 

ADD OFFSET HIGH BYTE 

STORE IN SOS JUMP ADDRESS HIGH BYTE 

JUMP TO SOS. KERNEL LOADER 



This section reads a block of data from the floppy disk drive. 
On entry the x-register contains the block low byte and the 
accumulator contains the block high byte. 



STX 


IBTRK 


LSR 


A 


ROR 


IBTRK 


LSR 


A 


ROR 


IBTRK 


LSR 


A 


ROR 


IBTRK 


TXA 




AND 


#07 


TAX 




LDA 


SECTABL.X 


STA 


IBSECT 


LDA 


#01 


STA 


IBCMD 


LDA 


#00 


STA 


IBDRVN 



STORE BLOCK LOW BYTE IN TRACK NUMBER 
DIVIDE BLOCK BY 8 TO GET TRACK NUMBER 



TRANSFER X-REGISTER WHICH CONTAINS THE BLOCK 

LOW BYTE TO ACCUMULATOR 

MASK OFF BITS 3,4,5,6,7 

TRANSFER ACCUMULATOR TO X-REGISTER 

LOAD ACCUMULATOR WITH PROPER SECTOR TO READ 

STORE IN SECTOR NUMBER 

LOAD ACCUMULATOR WITH $01 

STORE IN COMMAND NUMBER 

LOAD ACCUMULATOR WITH $00 

STORE IN DRIVE NUMBER 
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A139 
A13C 


20 00F0 
9005 


*1 J F\. M A ^— TCD DrfDWPC -mura mr* or»n r CTrr^vr^Ti itddu nnDDV nTCtf" 




rst/f»\, I BCC $010 


BRANCH IF NO DISK ERRORS OCCORED 






A13E 


A2 FF 


. /,_./ I LDX #0FF 


LOAD ACCUMULATOR WITH $FF 






A140 


9A 


TRANSFER X-REGISTER TO STACK POINTER 






A141 


B03B 


. , 1 BCS WRDISKERR 
VW\l 5010 | INC IBBOFP+1 
, J • 1 INC IBSECT 
SCCuJf" I INC IBSECT 


BRANCH TO WRITE DISK ERROR MESSAGE TO SCREEN 






A143 


E6 86 


INCREMENT BUFFER POINTER HIGH BYTE 






A145 


E6 84 


INCREMENT SECTOR NUMBER 






A147 


E6 84 


INCREMENT SECTOR NUMBER 






A149 


20 00F0 


Lj» JSR REGRWTS 


JUMP TO READ A SECTOR FROM FLOPPY DISK 






A14C 


9005 


r BCC $020 


BRANCH IF NO DISK ERRORS OCCURED 






A14E 


A2 FF 


LDX #0FF 


LOAD ACCUMULATOR WITH $FF 






A150 


9A 


TXS 


TRANSFER X-REGISTER TO STACK POINTER 






A151 


B02B 


BCS WRDISKERR 


BRANCH TO WRITE DISK ERROR MESSAGE TO SCREEN 






A153 


E6 86 


$020 INC IBBUFP+1 


INCREMENT BUFFER POINTER HIGH BYTE 






A155 


60 


RTS 


RETURN TO CALLER 






A156 
A156 
A156 












; This section writes the not found error message to the screen. 






A156 
A156 


















A156 


A2 IB 


WRNTFNDERR LDX #1B 


LOAD X-REGISTER WITH $1B 






A158 


A0 21 


LDY #21 


LOAD Y-REGISTER WITH $21 






A15A 


BD A4A1 


$010 LDA NTFNDERR-1,X 


LOAD ACCUMULATOR WITH NOT FOUND ERROR MESSAGE 






A15D 






BYTE 






A15D 


99 2806 


STA SCREENLOC, Y 


WRITE IT TO THE SCREEN 






A160 


88 


DEY 


DECREMENT Y-REGISTER 






A161 


CA 


DEX 


DECREMENT X-REGISTER 






A162 


D0F6 


BNE $010 


BRANCH IF MORE CHARACTERS TO WRITE ON SCREEN 






A164 


AD 40C0 


LDA IOBEEP 


BEEP SPEEKER 






A167 


4C 67A1 


$020 JMP $020 


HANG FOREVER ! ! 






A16A 










A16A 
A16A 












; This section writes the invalid kernel error message to the screen. 






A16A 
A16A 


















A16A 


A2 13 


WRINKERERR LDX #13 


LOAD X-REGISTER WITH $13 






A16C 


A0 ID 


LDY #1D 


LOAD Y-REGISTER WITH $1D 






A16E 


BD BFA1 


$010 LDA INVKEERR-1,X 


LOAD ACCUMULATOR WITH INVALID KERNEL ERROR 






A171 






MESSAGE BYTE 






A171 


99 2806 


STA SCREENLOC, Y 


WRITE IT TO THE SCREEN 






A174 


88 


DEY 


DECREMENT Y-REGISTER 






A175 


CA 


DEX 


DECREMENT X-REGISTER 






A176 


D0F6 


BNE $010 


BRANCH IF MORE CHARACTERS TO WRITE ON SCREEN 






A178 


AD 40C0 


LDA IOBEEP 


BEEP SPEEKER 






A17B 


4C 7BA1 


$020 JMP $020 


HANG FOREVER ! ! 






A17E 










A17E 
A17E 












; This section writes the disk error message to the screen. 






A17E 
A17E 


















A17E 


A2 0A 


WRDISKERR LDX #0A 


• LOAD X-REGISTER WITH $0A 






A180 


A0 18 


LDY #18 


• LOAD Y-REGISTER WITH $18 






A182 


BD D2A1 


$010 LDA DISKERR-1,X 


• LOAD ACCUMULATOR WITH DISK ERROR MESSAGE BYTE 






A185 


99 2806 


STA SCREENLOC, Y 


• WRITE IT TO THE SCREEN 






A188 


88 


DEY 


■ DECREMENT Y-REGISTER 






A189 


CA 


DEX 


■ DECREMENT X-REGISTER 






A18A 


D0F6 


BNE $010 


■ BRANCH IF MORE CHARACTERS TO WRITE ON SCREEN 






A18C 


AD 40C0 


LDA IOBEEP 


• BEEP SPEEKER 






A18F 


4C 8FA1 


$020 JMP $020 


■ HANG FOREVER ! ! 






A192 










A192 
A192 












; STORAGE FOR THE ERROR MESSAGE AND FILE VERIFICATION ROUTINES 






A192 
A192 


















A192 


0A 


FLNMELEN .BYTE 0A 






A193 


53 4F 53 


2E 4B 45 52 FLNME .ASCII "SOS .KERNEL" 






A19A 


4E 45 4C 








A19D 


53 4F 53 


20 4B 52 4E FLVERIFY .ASCII "SOS KRNL" 






A1A4 


4C 








A1A5 


46 49 4C 


45 20 27 53 NTFNDERR .ASCII "FILE 'SOS. KERNEL' NOT FOUND" 






A1AC 


4F 53 2E 


4B 45 52 4E 






A1B3 


45 4C 27 


20 4E 4F 54 






A1BA 


20 46 4F 


55 4E 44 






A1C0 


49 4E 56 


41 4C 49 44 INVKEERR .ASCII "INVALID KERNEL FILE" 






A1C7 


20 4B 45 


52 4E 45 4C 






A1CE 


20 46 49 


4C 45 






A1D3 


44 49 53 


4B 20 45 52 DISKERR .ASCII "DISK ERROR" 






A1DA 


52 4F 52 








A1DD 










A1DD 




.END 




SYMB 


DL TABLE DUMP 


AB - 


Ahsolute 


LB - Label UD - Undefined MC - Macro 




RF - 


Ref 


DF - Def PR - Proc FC - Func 






PB - 


Public 


PV - Private CS - Consts 






BOOT 


STRA PR — 


— | BREG AB FFEF [ DISKERR LB A1D3 | ENTRY LB A000 | EREG AB FFDF I 










k 
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HD: Apple ///:SOS Floppy Bootstrap Loader 



Page 5 



FILECNT 


AB 


00E5 


FIRSTPAG 


AB 


2000 


FLNME 


LB 


A193 


FLNME LEN 


LB 


A192 


FLVERIFY 


LB 


A19D | 


FLVRFY 


LB 


A0E2 


FLVRFYLP 


LB 


A0E4 


IBBUFP 


AB 


0085 


IBBUFPTM 


AB 


00E3 


IBCMD 


AB 


0087 | 


I BDRVN 


AB 


0082 


IBSECT 


AB 


0084 


IBTRK 


AB 


0083 


IDXBLK1 


AB 


0C00 


IDXBLK2 


AB 


0D00 | 


I NDXBLKC 


AB 


00E7 


INVKEERR 


LB 


A1C0 


IOBEEP 


AB 


C040 


JUMPSOSK 


LB 


A10B 


KBDSTROB 


AB 


C010 | 


LOADADR 


AB 


1E00 


MAINBUFF 


AB 


A200 


NMIVECTO 


AB 


FFCA 


NTFNDERR 


LB 


A1AS 


OFFSET 


AB 


1E08 | 


RD1SOSKE 


LB 


A0D1 


RDSOSDIR 


LB 


A02E 


RDSOSKEL 


LB 


A0F6 


RDSOSKER 


LB 


A0F2 


READBLK 


LB 


A11D | 


READIDXB 


LB 


A0BE 


READSOSD 


LB 


A02 4 


REGRWTS 


AB 


F000 


RETINT 


AB 


0040 


SCREENLO 


AB 


0628 I 


SECTABL 


AB 


F4A0 


SOSJMPAD 


AB 


00E8 


SRCHLP 


LB 


A06C 


SRCHSOSK 


LB 


A04 7 


WRDISKER 


LB 


A17E I 


WRINKERE 


LB 


A16A 


WRNTFNDE 


LB 


A156 





















Assembly complete: 363 lines 
Errors flagged on this Assembly 



6502 OPCODE STATIC FREQUENCIES 



ADC 


4 


1 


* * * * 


AND 


3 


1 


** * 


BCC 


2 


1 


** 


BCS 


3 


1 


* * * 


BEQ 


e 


1 


AAA*** 


BIT 


l 


m 


* 


BNE 


15 


1 


********* 


CLC 


2 


1 


* * 


CLD 


1 


m 


* 


CMP 


4 


1 


* * * * 


CPX 


2 


1 


* * 


DEC 


3 


1 


** * 


DEX 


5 




* * * * * 


DEY 


5 


1 


***** 


INC 


6 


1 


****** 


I NY 


2 


1 


* * 


JMP 


7 


1 


******* 


JSR 


6 


1 


****** 


LDA 


37 


M 


********* 


LDX 


12 


1 


********* 


LDY 


14 


1 


********* 


LSR 


3 


1 


* * * 


ORA 


1 


m 


* 


PHP 


1 


m 


* 


PLP 


1 


m 


* 


ROR 


3 


1 


* * * 


RTS 


1 


m 


* 


SBC 


2 


1 


* * 


SEC 


1 


m 


* 


SEI 


1 


m 


* 


STA 


23 


! 


********* 


STX 


2 


1 


** 


STY 


6 


1 


****** 


TAX 


3 


1 


* * * 


TAY 


1 


m 


* 


TXA 


1 


m 


* 


TXS 


3 


1 


* * * 


Minin 


lum frequency = 1 


Maxin 


lum frequency = 37 



r************** 



********** 



Average frequency = 5 

Unused opcodes: 

ASL BMI BPL BRK BVC BVS CLI CLV CPY 
SED TSX TYA 

Program opcode usage: 66 % 
(1.00) That's all. Folks ... 



EOR INX NOP PHA PLA ROL RTI 
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III Computer Information / 
















* Apple 




APPLE /// SOS BOOTSTRAP LOADER 














HEXADECIMAL DUMP 




















Source 






DISKLdofile 


as 


found with Chris 


Smolinski's Macintosh SARA emulator application 














Printed by David T. Craig • December 1997 




This hex dump 


which was 


produced by the Apple Macintosh MPW DumpFile tool, lists the 




Apple 


/// SOS 


Bootstrap Loader. 


This 


512 byte loader exists at block of SOS disks and is 




loaded 


by 1 


he 


App 


e /// ROM into 


memory addresses $A000-$A1FF. This code's purpose is 




to beg 


in the loading of SOS from the floppy disk into the Ill's memory. 




0: 


4C 


6E 


A0 


53 


4F 


53 20 


42 


4F 4F 54 20 20 31 2E 31 LntSOS .BOOT. . 1 . 1 




10: 


20 


0A 


53 


4F 


53 


2E 4B 


45 


52 4E 45 4C 20 20 20 20 ..SOS. KERNEL 




20: 


20 


53 


4F 


53 


20 


4B 52 


4E 


4C 49 2F 4F 20 45 52 52 . SOS .KRNLI/O.ERR 




30: 


4F 


52 


08 


00 


46 


49 4C 


45 


20 27 53 4F 53 2E 4B 45 OR. .FILE . ' SOS .KE 




40: 


52 


4E 


45 


4C 


27 


20 4E 


4F 


54 20 46 4F 55 4E 44 25 RNEL ' . NOT . FOUND% 




50: 


00 


49 


4E 


56 


41 


4C 49 


44 


20 4B 45 52 4E 45 4C 20 . INVALID . KERNEL . 




60: 


46 


49 


4C 


45 


3A 


00 00 


OC 


00 IE 0E IE 04 A4 78 D8 FILE: §xy 




70: 


A9 


77 


8D 


DF 


FF 


A2 FB 


9A 


2C 10 CO A9 40 8D CA FF ©wgfTC'6, . d©@Q " 




80: 


A9 


07 


8D 


EF 


FF 


A2 00 


CE 


EF FF 8E 00 20 AD 00 20 ©. g6"C .fflS'e . .*. . 




90: 


DO 


F5 


A9 


01 


85 


E0 A9 


00 


85 El A9 00 85 85 A9 A2 -i©.0*©.0-©.00©<: 




A0: 


85 


86 


20 


BE 


Al 


E6 EO 


A9 


00 85 E6 E6 86 E6 86 E6 OU.«°E$©.OEEUEUE 




B0: 


E6 


20 


BE 


Al 


A0 


02 Bl 


85 


85 E0 C8 Bl 85 85 El DO E .ae°t .±OOt»±00- - 




CO: 


EA 


A5 


E0 


DO 


E6 


AD 6C 


AO 


85 E2 AD 6D A0 85 E3 18 ± • t-E*ltO ,*mtO„ . 




DO: 


A5 


E3 


69 


02 


85 


E5 3 8 


A5 


E2 ED 23 A4 85 E4 A5 E5 • „i . OA8 • , I#§6fe»A 




E0: 


E9 


00 


85 


E5 


A0 


00 Bl 


E2 


29 OF CD 11 A0 DO 21 A8 E.OAt .+, ) .0. t- !® 




F0: 


Bl 


E2 


D9 


11 


A0 


DO 19 


88 


DO F6 A0 00 Bl E2 29 F0 ±, Y. t-.a-" t -±, ) * 




100: 


53 


4F 


53 


20 


4B 


52 4E 


4C 


62 00 01 00 OE 2E 44 31 SOS.KRNLb Dl 




110: 


2F 


53 


4F 


53 


2E 


49 4E 


54 


45 52 50 AA A5 A0 F9 AO /SOS . INTERP™* t " t 




120: 


A0 


A5 


A0 


A0 


A5 


AO AO 


C5 


AO AO 98 AO FO Al AO CC t • t t • t t=t tdt#°tA 




130: 


A0 


A0 


C5 


A0 


AO 


AO AO 


AO 


EE AO AO C4 OE 2E 44 31 t t==tt 1 1 t6t t/ . -Dl 




140: 


2F 


53 


4F 


53 


2E 


44 52 


49 


56 45 52 FF 9A AO FF 9A /SOS .DRIVER" 6 t "6 




150: 


A0 


A0 


A0 


A0 


DO 


AO AO 


CI 


AO AO 8A AO AO F9 AO CI t t t t-t t j t tat t " t i 




160: 


E9 


A0 


9E 


Al 


AO 


F5 AO 


AO 


A5 AO AO 88 00 00 88 OC EtG°Ut t • t ta. . a. 




170: 


A9 


00 


AA 


9D 


00 


1A 9D 


00 


16 9D 00 IB 9D 00 18 9D ©.™u. .u. .u . .u. .u 




180: 


00 


14 


9D 


00 


01 


CA DO 


EB 


A9 3 8D DF FF A2 FB 9A ..u.. -I©0gfT<:°6 




190: 


A9 


1A 


8D 


DO 


FF 


20 D4 


IF 


AD DF FF 29 10 09 28 8D ©.g-~. ' .*fT) . . (g 




1A0: 


DF 


FF 


A2 


FF 


9A 


A9 1A 


8D 


DO FF AD 01 19 8D EF FF fTCo©. g-~*. . g6" 




1B0: 


6C 


02 


00 


AA 


AD 


EF FF 


48 


8E EF FF A5 27 05 26 FO 1 . . I[ ^6"He6" • ' . &# 




ICO: 


33 


A5 


26 


DO 


02 


C6 27 


C6 


26 18 A5 23 65 27 85 23 3 •&- . A' A&. »#e ' 0# 




1D0: 


A5 


25 


65 


27 


85 


25 E6 


27 


A4 26 FO 07 Bl 22 91 24 »%e ' 0%E ' §&tf.+"e$ 




1E0: 


88 


DO 


F9 


Bl 


22 


91 24 


88 


C6 23 C6 25 C6 27 DO EC a-"± ,, e$aA#A%A' -I 




1F0: 
### 


E6 


23 


E6 


25 


68 


8D EF 


FF 


60 18 A5 24 65 10 85 10 E#E%hg6" N . «$e.O. 
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The Apple III 

The Most Powerful Personal Computer In Its Class 



Too much information? Not enough 
time? The Apple /// was created to 
meet the information-handling needs 
of decision makers at all levels, in 
every size and kind of company. And 
the Apple /// can grow with you, so as 
your responsibilities increase, your 
ability to handle them stays one step 
ahead. 

You can use the power of your 
Apple /// to create financial forecasts, 
budgets, and reports; for accounting, 
resource management, and project 
scheduling; in electronic communi- 
cations, software development, and 
computer-assisted training. Over 400 
business programs are available today 
for the Apple /// — plus the extensive 
library of CP/M® business software 
(with the Apple SoftCard T " ///). And 
most Apple // Plus programs will run 
in the Apple Ill's "emulation" mode. 

The Apple ///: the personal com- 
puter for business. 




Powerful features for 
professional needs. 

The Apple /// is ready to go as soon 
as you unpack it, connect a monitor, 
and provide power. No interface cards 
are required, and you don't have to 
open the computer. The Apple /// 
already has a built-in disk drive, video 
outputs for color and monochromatic 
displays, and a numeric keypad. 
Other built-in features include: 
Large User Memory. The Apple Ill's 
256K of internal memory means you 
can work with sophisticated programs 
and large financial and text docu- 
ments, quickly and efficiently. 
Color Graphics. The 16-color graphics 
capability of the Apple /// allows you 
to grasp the meaning of charts and 
graphs quickly. If you're not using 
a color monitor, your information is 
displayed in 16 shades, so the facts 
still stand out clearly. 
High-Resolution Video. The Apple /// 
displays 107, 520 points of information 
on the screen (560 horizontal x 192 
vertical) in text and monochromatic 
graphics modes. While text is normally 
presented in an 80-column by 24-line 
monochromatic format, it can be 
switched to 40-column monochro- 
matic or color-on-color. 



Accessory Connectors. The most 
common accessories plug right into 
the Apple ///. Connectors and inter- 
facing hardware are already built in 
for the Apple Daisy Wheel Printer 
(or other serial printer), the Apple 
Silentype Printer, external floppy 
disk drives, color and monochro- 
matic video displays (NTSC, RGB, 
and composite), a modem, and hand 
controls. The Apple /// also has four 
inside expansion slots for additional 
accessories. 

Apple IN Sophisticated 
Operating System: it does it 
all for you. 

Today . . . you can bring financial 
models into reports, insert names into 
form letters automatically, and turn 
numbers into charts, because the 
Apple Ill's Sophisticated Operating 
System (SOS) treats all your files 
identically. And, since applications 
programs written for the Apple /// are 
all based on this common SOS for- 
matting, you can combine them on 
a ProFile™ mass storage system and 
move freely from one to another. The 
uniformity of SOS also provides an 
ideal environment for software 
development. 
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Tomorrow . . . you can expand your 
Apple /// elegantly. Because SOS 
controls all communications with 
accessories, you don't have to figure 
out how to make the computer work 
with a new printer, disk drive, or 
modem. SOS does this for you by 
using special files known as "device 
drivers." Apple /// programs come 
with the most commonly-used device 
drivers, and you can make programs 
compatible with new equipment by 
copying a driver file for the new device 
onto a program disk. Your software 
can just as easily be revised to take 
advantage of SOS upgrades, and 
of hardware enhancements to the 
computer itself. 

Installation's easy. 
Learning is, too. 

Because the Apple /// already has 
a built-in disk drive and video con- 
nector, the computer is ready to work 
as soon as you connect a monitor and 
provide power. Then, Apple makes it 
just as easy to learn how to use it. A 
comprehensive Owner's Guide gets 
you started, and a System Demonstra- 
tion disk introduces you to the com- 
puter's text editing and graphics 
capabilities. Reference manuals and 
SOS utilities disks are included for 
more advanced needs, and additional 
tutorials on the computer and its 
programs are also available. 




Durable. Dependable. 
Reliable. 

The Apple /// is dependable, inside 
and out. Outside, it has a rugged die- 
cast aluminum chassis. Inside, elec- 
tronics based on advanced micro- 
processor circuitry assure reliable 
operation. The system also meets 
UL and CSA standards. 

Every time the computer is powered 
up, it performs a brief self-diagnostic 
routine. Should problems arise, help 
is close at hand, because of Apple's 
extensive dealer/service network. 
Average turnaround time on Apple /// 
servicing is less than one day. 




Standard Features 

■ 256K internal memory (RAM) 

■ Built-in disk drive 

■ Custom microprocessor circuitry 

■ High-resolution color graphics 
(16 colors) 

■ 80-column, 24-line text display, 
upper and lower case 

■ Contoured typewriter-style key- 
board; 61 keys; all 128 ASCII codes; 
auto-repeat on all keys 

■ Numeric keypad (13 keys) 

■ Special-purpose keys: Up-Arrow, 
Down-Arrow, Left-Arrow, Right- 
Arrow; programmable Open-Apple 
and Solid-Apple; TAB; SHIFT; 
ALPHA LOCK; CONTROL; 
RETURN; ENTER; ESCAPE 

■ Quick-connect plugs for disk drives, 
video and audio devices, serial 
printers, modems, and hand 
controls 

■ Four expansion slots for accessory 
interface cards 

■ Apple // Plus emulation mode 

■ High-quality sound generation 

■ Lockablecase 

■ Self-testing diagnostics on powerup 

Optional Accessories 

■ Monitor III or color monitor 

■ Apple Daisy Wheel Printer 

■ Apple Dot Matrix Printer 

■ Apple Silentype Printer 

■ Disk ///floppy-disk drives 

■ ProFile hard-disk systems 

■ Apple SoftCard /// System 
(for CP/M capability) 

■ Parallel Card /// 

■ Serial Card /// 

■ Programming languages (Business 
BASIC, Pascal, COBOL) 

■ Cursor ///joysticks 
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Technical Specifications 

■ Video Display: 

Text and graphics may be displayed 

simultaneously. Graphics modes: 

—280 x 192, 16 colors (with some 
limitations); 

— 280 x 192, monochromatic; 

—140x192, 16 colors; 

—560 x 192, monochromatic; 

—All Apple // modes (in emulation) 
Graphics commands allow either of 
two screen buffers to be displayed. 
Text modes: 

— 80-column, 24-line mono- 
chromatic; 

— 40-column, 24-line, 16-color 
foreground and background; 

—40-column, 24-line mono- 
chromatic. 
All text modes have a software- 
definable, 128-characterset (upper- 
and lower-case), with normal or 
inverse display. 

a Central Processing Unit (CPU): 
The custom-designed microprocessor 
circuitry of the Apple /// utilizes the 
6502B as one of its major components. 
Other circuitry provides extended 
addressing capability, relocatable 
stack, zero page, and memory 
mapping. 
Type: 

6502B. 
Clock Speed: 

1 .4 MHz average; 1.8 MHz maximum. 
Operations Per Second (8-bit): 

Up to 750,000. 
Data Bus: 

Two 8-bit formats, combined for 

extended addressing. 
Address Bus: 

19 bits. 
Address Range: 

262,144 bytes (256K). 
Registers: 

Accumulator (A); Index Registers 

(X,Y); Stack Pointer (S); Program 

Counter (PC); Environmental 

Register (E); Bank (B); Zero Page 

(Z); Processor Status (P). 

a Memory: 

256K dynamic RAM; 

4K ROM (initialization and self-test 

diagnostics). 



a SOS (Sophisticated Operating 

System): 

Handles all system I/O; 

Can be configured to handle standard 
or custom I/O devices and periph- 
erals by adding or deleting "device 
drivers"; 

All languages and application pro- 
grams access data through the SOS 
file system. 

a Inputs and Outputs: 
Keyboard: 
—61 keys on main keyboard; 
—13 keys on numeric keypad; 
—Full 128-character, ASCII 

encoded; 
—All keys have automatic repeat; 
—Four directional-arrow keys with 

two-speed repeat; 
—Two user-definable Apple keys; 
—Seven other special keys: SHIFT, 

CONTROL, ALPHA LOCK, TAB, 

ESCAPE, RETURN, ENTER. 
Storage Devices: 
—One 5.25-inch floppy disk drive 

built in, 140K (143, 360) bytes per 

diskette; 
—Three additional drives can be 

connected by daisy-chain cable 

(Total: 560K bytes on-line 

storage); 
—Up to four ProFile hard-disk drives 

(5 megabytes each) may be added 

with plug-in interface cards. 
Video Output: 
—RCA phono connector for NTSC 

monochromatic composite video; 
— DB-15 connector for: 

NTSC color composite video; 

NTSC monochromatic composite 
video; 

RGB color video; 

Composite sync signal; 

Power supply voltages. 
—Color signals appear as 16-level 

grey scale on monochromatic 

displays. 
Audio Output: 
— Built-in two-inch speaker; minia- 
ture phono jack on back panel; 
—Driven by 6-bit D/A converter or 

fixed-frequency "beep" generator. 
Serial (Printer/Modem) Port: 
— RS-232C compatible, DB-25 

female connector; 
—Software-selectable baud rate and 

duplex mode. 
One port may be used for the 
Silentype printer. 



One port may be used for the Silentype 
printer. 
Expansion: 
—Four 50-pin expansion slots (fully 
buffered, with interrupt and DMA 
priority structure). 
Joystick/Si lentype Ports: 
—Two DB-9 connectors. 

a Languages Available: 

Apple Business BASIC, Apple /// 

Pascal, Apple /// COBOL. 

a Emulation Mode: 

Provides hardware emulation of 48K 

byte Apple // Plus. Allows most Apple // 

programs, with the exception of Pascal 

and FORTRAN, to run without 

modification. 

a Electrical Specifications: 

The Apple Ill's power cord should be 

plugged into a three-wire 110-120 volt 

outlet. 

a Physical Specifications: 
Height: 4.8 inches (12.20 cm) 
Depth: 18.2 inches (46.22 cm) 
Width: 17.5 inches (44.45 cm) 
Weight: 26 lbs. (11.8 kg) 

The Apple/// meets the following 

agency regulations: 
UL 114 — Office Appliances and 

Business Equipment. 
CSA 22.2, No. 154— Data Processing 

Equipment. 

The Apple /// Personal Computer 

System Package 

U.S. Order Number A3S0256 

With your order for an Apple /// 

System you will receive: 

256K Apple ///; 

Power cord; 

Monitor cable; 

System Demonstration disk; 

System Utilities disk; 

System Utilities Data disk (contains 

device driver files, character sets, 

and keyboard layouts); 
Apple // Plus Emulation disk; 
Owner's Guide; 

Standard Device Drivers Manual; 
Warranty and service information. 

Specifications or products may change without 

notice. 

Apple, the Apple logo. ProFile, and Silentype 

are trademarks of Apple Computer, Inc. 

SoftCard is a trademark of Microsoft 

Corporation. 

CP/M is a trademark of Digital Research, Inc. 
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